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Pit Stop 


auf 
Colecovision 


Pit Stop erscheint auf den er- 
sten Blick als “stinknormales” 
Autorennen, bietet jedoch eine 
reizvolle Variante: Sie kontrol- 
lieren nicht nur den Wagen, 
mit dem Sie am Grand-Prix teil- 
nehmen, sondern beeinflußen 
überdies die Arbeit der Mecha- 
niker in der Box, die Ihre Rei- 
fen wechseln und den Tank 
nachfüllen. Dadurch entschei- 
det nicht nur die Runden- 
geschwindigkeit über Sieg und 
Niederlage - das Spiel erhält 
zusätzliche Schwierigkeiten und 
Handicaps: Der Wettbewerb 
wartet mit einigen Risiko- 
punkten mehr auf. 


ist fast ein Adventure im For- 


Sechs verschiedene Rennen kön- 
nen bestritten werden: der 
Große Preis von Monaco, die 
24 Stunden von LeMans (was 
freilich nicht heißt, daß Sie die- 
sen Kurs in Echtzeit bestreiten 
müssen), die Kyalami, die Albi 
sowie das Jarama-Wüstenren- 
nen. 

Nach Qualifikation in den Vor- 
runden werden Sie entweder 
auf dem kleinen oder großen 
Streckenkurs starten: Im ‘Klei- 
nen’ wird Ihnen eine zufällige 
Auswahl von dreien aus un- 
serem Rennstrecken-Verzeich- 
nis zugemutet, der Großkurs 
besteht aus allen Sechsen. Da- 


durch lassen sich vielfältige 
Startbedingungen erreichen, 
wodurch die maximal vier Renn- 
teilnehmer ordentlich gefor- 
dert werden - zumal zusätzlich 
noch drei Levels zur Verfügung 
stehen. Die Graphik ist gut, 
einige geschickt eingesetzte 
Soundeffekte sind ebenfalls vor- 
handen, kurzum: man wird je- 
des mögliche Rennen mit viel 
Spaß bestreiten. 


MON 5 dar: 
MAGIE 


mat der ”Dungeous & Dra- 
gons”. Bevor Sie als stolzer 
Recke losziehen und den 
Kampf gegen den Herren der 
Dämonen aufnehmen können, 
muß zunächst Ihr jeweiliger 
Charakter festgelegt werden. 
Das Spiel bietet verschiedene 
Kombinationsmöglichkeiten, 

was Körperkraft, seelische Ver- 
fassung und Ihr Temperament 
anbelangt, wodurch wesentlich 
abwechslungsreichere Aus- 
gangssituationen möglich wer- 
den, alswenn lediglich ein paar 
Levels zur Verfügung stehen. 

Natürlich haben Sie auch ver- 
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schiedene Waffen zur Aus- 
wahl, wenn Sie aufIhren Feind 
treffen. Gemeinsam mit den zu 
Beginn des Spiels definierten 
Eigenschaften sowie sage und 
schreibe 52 Levels ergeben sich 
praktisch immer neue Überra- 
schungen. Allerdings ist”Mon- 


Fliegende Federn 


für den Commodore 64 


In diesem wirklich originellen 
Spiel sind Sie der uner- 
schrockene Besitzer eines 
Fischteichs, in dem ein ganzes 
Rudel fetter und gesunder 
Forellen steht. 

Damit Sie und Ihre Kund- 
schaft, der Sie die Grundlage 
für ein leckeres Menü verkau- 
fen wollen, in gegebener Zeit 
auch erfolgreich angeln kön- 
nen, müssen Sie aufpassen, 
daß keiner die Forellen klaut. - 
Der beste Zaun nutzt jedoch 
wenig, wenn die ungebetenen 
Interessenten aus der Luft 
kommen. Da hilft nur eines: 


sters & Magic” nichts für Unge- 
duldige: Sechs bis acht Stunden 
haben wir in der Redaktion 
nach einer angemessenen 
”Einarbeitungsphase” vor un- 
serem Dragon gesessen. 

Unser einhelliges Urteil war: 
Ganz erreicht dieses Spiel den 


Sie müssen selbst 
auf dem Posten 
sein und vom Boot 
aus die angriffslu- 
stigen Adler am 
Beutemachen hin- 
dern. 

Das Programm - wir ha- 
ben es bei Bubble Bus in 
England gesehen - fährt voll 
auf die Sprite-Technik des 
C-64 ab und bringt eine ab- 
wechslungsreiche Grafik mit 
zum Teil urkomischen Gags. 
100% Maschinensprache ist 
selbstverständlich. Wenn 
"Flying Feathers” noch dreidi- 


Standard der nicht computer- 
unterstützten Version noch 


nicht, doch bleibt es auch nicht 
weit dahinter zurück. 









mensional 
könnte man wirklich nicht 
meckern. 


ausgelegt wäre, 


CAYERUNNER. 


Sie sind höchstpersönlich der 
Caverunner und müssen in der 
Tat ganz schön durch die Höh- 
lengänge rennen, um die ver- 
borgenen Schätze Stück für 
Stück an’s Tageslicht zu 
fördern. 

Aus zwei Schachtsystemen 
sind insgesamt zehn Ein- 
zelteile des Schatzes zu bergen, 
was in der Anfänger-Stufe 
durch bloßes Berühren mög- 
lich ist. Bloßes Berühren - das 
istleichter gesagt als getan: Das 
Super-Spiel für die ganze Fa- 
milie wartetimmerhin miteini- 
gen Widerwärtigkeiten auf, um 


Ihnen das Einsammeln der 
verheißungsvoll im Dunkel 
blitzenden Gegenstände zu er- 
schweren. Wie schmeckt Ihnen 
zum Beispiel der grün-eklige 
Schleim, mit dem die Höh- 
lenwände bedeckt sind, und der 
Sie bei Berühren in’s Jenseits 
befördert? Wie gefallen Ihnen 
die faulig-brackigen Wasser- 
lachen, die Sie durchqueren 
müssen, um an Ihr Ziel zu 
kommen? Wenn Sie nicht sehr 
beherzt sind, sollten Sie sich 
Caverunner auf keinen Fall 
laden... 
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Thunderhawk 


\. sind Raumschiff-Kom- 
mandant und müssen gegen ei- 
nen aggressiven Schwarm un- 
heimlicher Vogel-Monster an- 
gehen, der nach jeweils fünf 
Angriffen seine Kampfkraft 
entscheidend verstärkt und Ih- 
nen so ganz schön zu schaffen 
macht. Da die Flugmonster 
nicht nur verschiedene Um- 
risse, sondern auch unter- 
schiedliche Angriffstaktiken 
besitzen, wird es Ihnen sicher 
nicht leicht werden, gegen sie 
zu bestehen. Höchstwahr- 
scheinlich werden Sie nicht 
weit kommen und wie Ihre 
Vorgänger elend im All zu- 
grunde gehen - sollte Ihnen je- 
doch wider Erwarten der 
Durchbruch gelingen, so sollte 


Metro Blitz 


ist ein typisches Space-Inva- 
ders in Perfektion. Auch hier 
haben Sie es mit glitzernden 
Gestalten aus einer fernen 
Welt zu tun, die sich blitz- 
schnell auf Ihre Verteidigungs- 
taktik einstellen und nur durch 
massiven Gebrauch Ihrer 
Laserkanonen davor ab- 
gehalten werden, die Erde zu 
erobern. 

Sie haben die Aufgabe, Ihre 
Stadt zu verteidigen! Nur ein 
etwas klappriges kleines Schiff 
steht Ihnen zur Verfügung. 





es Ihre Aufgabe sein, das feind- 
liche Flaggschiff zu ver- 
nichten, um vor den greus- 
lichen Angreifern sicher sein 
zu können. Allerdings handelt 
es sich dabei um einen wahren 
Tausendsassa in den Künsten 
der Verteidigung, der nur eine 
einzige ‘Achillesferse’ besitzt, 
die wir Ihnen natürlich nicht 
verraten können. Schließlich 
hätten wir das Monsterschiff 
dann vernichten und Ihnen die 
Arbeit abnehmen müssen. 
Und Kopf und Kragen wollten 
wir dabei natürlich nicht 
riskieren: das müssen Sie 
schon selbst tun! 

Eine der gelungensten Fea- 
tures des Spieles ist die farben- 
frohe, gekonnt eingesetzte Gra- 






Die Eindringlinge kommen als 
Kamikaze-Schwadron, also 
mit Selbstmordauftrag. Jeder 
Space-Invader stürzt sich auf 
einen Stadtteil, der dann völlig 
vernichtet ist. 

Sie haben nur einen Auftrag: 
schießen auf alles, das sich be- 
wegt! - 

Das Spiel ist freilich professio- 
nell gemacht, das sieht und 
hört man. Bei uns allerdings 
hat sich nach einer gewissen 


BAR se SS BR 






AG 


phik, die die Möglichkeiten 
Ihres Spectrums voll fordert - 
im Gegensatz der meisten an- 
deren für diesen Gerätetyp er- 
hältlichen Programme. 

Die Steuerung ist echt einfach, 
darüber hinaus ist die Software 
Kempston-kompatibel. Soweit 
man bei einer Science Fiction 
Handlung davon sprechen 
kann, ist die Darstellung reali- 
stisch. Das betrifft in erster Li- 
nie die exakte Ausarbeitung 
des Flügelschlags. Von der 
Grundkonzeption her ist 
Thunderhawk eine auf- 
bereitete Phönix-Fassung, die 
allerdings weitaus besser insze- 
niert ist. 





Zeit ein ganz schöner Ermü- 
dungseffekt breit gemacht. Das 
mag eben daran liegen, daß 
Metro Blitz zwar technisch auf 
dem allerneuesten Stand ist, 
von den Ideen her jedoch nicht 
über die ersten Spiele dieser Art 
hinauskommt. Somit unser Ur- 
teil über dieses Game: wem es 
vor allem auf dauernd neue 
Herausforderung seiner Reak- 
tionsfähigkeit ankommt, wird 
seinen Spaß daran haben. Wer 
vor allem Überraschungen 
liebt, sollte die Finger davon 
lassen. 
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SYNTHIMAT 


SYNTHIMAT verwandelt Ihren 
COMMODORE 64 in einen poly- 
phonen, dreistimmigen Syn- 
thesizer. 


YNTHIMAT in Stichworten: 

rei Oszillatoren (VCOs) mit 
7 Fußlagen und 8 Wellenfor- 
men - drei Hüllkurvengenera- 
toren (ADSRs) - Ringmodula- 
tion mit allen drei VCOs - 8 
softwaremäßig realisierte 
Oszillatoren (LFOS) - kräftiger Klang durch polyphones Spie- 
len - zwei Manuale (Solo und Begleitung) - speichern von bis 
zu 256 Klangregistern - schneller Registerwechsel - spei- 
chern von 9 Registerdateien auf Diskette - ‚Bandaufnahme" 
auf Diskette durch direktes Spielen - keine lästige Notenein- 
gabe - integrierte 24 Stunden-Echtzeituhr - einstellbares 
PITCH-BENDING - farblich gekennzeichnete, übersichtlich 
angeordnete Module - umfangreiches Handbuch - läuft mit 
einem Diskettenlaufwer. 

























DAS MUSIKBUCH hilft Ihnen, die riesigen 
Klangmöglichkeiten des C64 zu nutzen. Die 
Themenbreite reicht von einer Einführung 
in die Computermusik über die Erklärung 
der Hardwaregrundlagen des COMMODORE 
64 und die Programmierung in BASIC bis hin 
zur fortgeschrittenen Musikprogrammie- | 
rung in Maschinensprache. Einiges aus dem | 
Inhalt: Soundregister des COMMODORE 64, l 
Gate-Signal, Programmierung der "ADSR'- 4 
Werte, Synchronisation und Ring-Modulation, Counterprinzip, 
lineare und nichtlineare Musikprogrammierung, Frequenz- 
modulation, Interrupts in der Musikprogrammierung und vie- 
les mehr. Zahlreiche Beispielprogramme, komplette Songs 
und nützliche Routinen ergänzen den Text. Erschließen Sie 
sich die Welt des Sounds und der Computermusik. 


DAS MUSIKBUCH ZUM COMMODORE 64, über 200 Seiten, DM 39,- 


























BASIC-PLUS. 


Auf über 300 Seiten erklärt Ihnen das DATA 
BECKER Trainingsbuch detailliert den umgang 
mit den über 100 Befehlen des SIMON's BASIC. Alle 
Befehle werden ausführlich dargestellt, auch 
die, die nicht im Handbuch stehen! Natürlich zei- 
gen wir auch die Macken des SIMON's BASIC und 
geben wichtige Hinweise wie man diese umgeht. 
Natürlich enthält das Buch viele Beispielpro- 
gramme und viele interessante Programmier- 
tricks. Weiterer Inhalt: Einführung in das CBM- 
BASIC 2.0 - Programmierhilfen - Fehlerbehand- 
lung - Programmschutz - Programmstruktur - Variablen - Zahlen- 
behandlung - Eingabekontrolle - Ein/Ausgabe Peripheriebefehle - 
Graphik - Zeichensatzerstellung - Sprites - Musik - SIMON’s BASIC 
und die Verträglichkeit mit anderen Erweiterungen und Program- 
men. Dazu ein umfangreicher Anhang. Nach jedem Kapitel finden sie 
Testaurgaben zum optimalen Selbststudium und zur Lernerfolgs- 
ontrolle. 


DAS TRAININGSBUCH ZUM SIM: 
ca. 380 Seiten, DM 49,- 



























ION's BASIC, 2. überarbeitete Auflage, 1984, 






Computerkünstler. 


Das Grafikbuch zum COMMODORE 64 Buch 
stammt aus der Feder von Axel Plenge. Es geht 
weit über die reine Hardware-Beschreibung der 
Grafikeigenschaften des C-64 hinaus. Der Inhalt 
reicht von den Grundlagen der Grafikprogram- 
mierung bis zum Computer Aided Design. The- 
men sind z.B.: Zeichensatzprogrammierung, 
bewegte Sprites, High-Resolution, Multicolor-Gra- 
fik, Lightpenanwendungen, Betriebsarten des 
VIC, verschieben der Bildschirmspeicher, IRQ- 
Handhabung, 3-Dimensionale Grafik, Projektio- 
nen, Kurven. Balken- und Kuchendiagramme, Laufschriften, Anima- 
tion, bewegte Bilder. Viele Programmlistings und Beispiele sind 
selbstverständlich. Das COMMODORE-BASIC V2 unterstützt die heraus- 
ragenden Grafikeigenschaften des C-64 bekanntlich kaum. Hier 
helfen die vielen Beispielprogramme in diesem Buch weiter, die die 
faszinierende Welt der Computergrafik jedermann zugäng-lich 
machen. Kompetent ist der Autor dazu wie kaum ein anderer, 
schließlich hat er das äußerst leistungsfähige Programm SUPERGRA- 
FIK geschrieben. 


DAS GRAFIKBUCH ZUM COMMODORE 64, 1984, 295 Seiten, DM 39,- 


































" SUPERGRAFIK 64 


Entdecken Sie die faszinierende welt 
der Computergraphik mit SUPERGRA- 
FIK 64, der starken Befehlserweite- 
rung mit den vielseitigen Möglichkei- 
ten. Durch die neue verbesserte Ver- 
sion jetzt noch leistungsstärker. 


SUPERGRAFIK 64 in Stichworten: 
2 unabhängige Graphikseiten 
(320x200 Punkte) - logische Verknüp- 
fung der beiden Graphikseiten (AND, 
OR, EXOR) - 1 Standard Low-Graphik 
Seite (80x50 Punkte) - Normalfarben Graphik (320 x 200 Punkte) - 
Multicolor-Graphik (160x200 Punkte) - verdecktes Zeichnen (z.B. 
Text sichtbar, Graphikseite 2 wird erstellt) - Textfenster in der 
Graphik - 183 Befehlskombinationen (1. Für jeden Befehl wähl- 
bare Zwischenmodi: Zeichnen, Löschen, Punktieren, Graphik-Cur- 
sor bewegen, 2. Durch einfache Befehle zu steuernde Graphik- 
figuren: Punkt, Linie, Linienschar, Linie vom Graphik-Cursor, 
Kreise, Kreisbögen, Ellipse, Ellipsenbögen, selbstdefinierbare Figu- 
ren, rotieren und vegrößern dieser Figuren, 3. Weitere Graphik- 
befehle: Graphikseiten- und Moduswechsel, Graphik löschen, Gra- 
phik invertieren, Scrolling von Text und Graphik, Wählen der Rah- 
men; Hintergrund, Zeichen- oder Punktfarbe) - Speichern, Laden 
von Graphik - Kopieren des Textbildschirms in die Graphikseite - 
Hardcopies für EPSON, Seikosha GP100VC, Farbi)drucker Seikosha 
GP700 und andere mit DATA BECKER Interface - Positionieren und 
Bewegen ()) von 16 Sprites gleichzeitig und unabhängig von- 
einander, während das übrige Programm weiterläuft - Sprite- 
Kollisionsüberprüfung, Joystickunterstützung - komfortable 
Soundprogrammierung mit Verstellung aller möglichen Sound- 
Parameter, ebenfalls unabhängig vom übrigen Programmlauf - 
zahlreichen Programmiertools (MERGE, RENUMBER usw.) - um- 
fangreiche Anleitung - Diskettenprogramm. DM 99,- 














































PAINT PIC 


Malen (!) mit dem Computer, welch eine fas- 
zinierende Idee. Mit dem Malprogramm 
PAINT PIC für den COMMODORE 64 wird 
diese Idee Realität. Mit PAINT PIC ist 

es auch für den Einsteiger leicht, 
fantastische Computerbilder zu 

erstellen. Man kann die Bilder auf 

Diskette abspeichern und wieder 

laden. Wichtig: PAINT PIC benö- 

tigt keine zusätzliche Hardware. 


PAINT PIC in Stichworten: 
Programmsteuerung: Tastatur - Steuerung des Stifts: Cursor- 
tasten und eckige Klammer (diag.) Joystick kann benutzt 

werden) - Routinen: Linien, Rechtecke, Dreiecke, Parallelo- 

gramme, Kreise, Kreisbögen, Ellipsen, Bestimmung von Mittel- 
Punkt, und perspektivischer Linie, Kopieren und Drehen von 
Teilbildern, Verdoppeln, halbieren und spieigeln von Teilbil- 
dern - Modi: Malstiftmodus (schmale Linie) Pinselmodus 
(8 verschiedene Breiten) (Art der Linie selbst definier- 
bar) — Textmodus (kompl. Zeichensatz COMMODORE) 
(Hoch-Tiefschrift) - Speichern: Teilbilder (Blöcke) 
oder ganze Bilder — mit ausführlichem deut- 
schen Handbuch - Diskettenprogramm. 

























Nicht für die Schule, sondern 


am Computer 
[ Iernen wir heute. Der Prozeß allgemeiner Auto- 


matisierung, der mit den Manufakturen des 18. 
Jahrhunderts seinen Anfang genommen hatte, mit 
der Dampfmaschine und den mechanisierten 
Webstühlen im England des frühen 19. Jahrhun- 
derts fortgeführt wurde und in Deutschland 1934 
mit dem ersten echten Computer, gebaut durch 
Conrad Zuse, entscheidend forciert wurde, strebt 
jetzt im Zeichen der elektronischen Revolution ei- 
nem nie zuvor in die Menschheitsgeschichte er- 
lebten Grad an Entmündigung des Menschen zu. 
Entmündigung, die zugleich eine Emanzipation im 
Sinn einer Befreiung von körperlicher Schwerstar- 
beit signalisieren kann. 

Schon jetzt, angesichts der in den Industrienatio- 
nen gravierenden Arbeitsmarktlage, wird zu- 
nehmend deutlich, wie die Pyramide möglicher 
menschlicher Qualifikation vom Sockel her de- 
montiert wird. Und dies mit einer Geschwindig- 
keit, der die Gesellschaft, in der wir leben, nur sehr 
bedingt gewachsen ist. 

Deshalb immer lauter der Ruf nach dem Com- 
puter, der im Klassenzimmer seinen Dienst ver- 
sieht und eine völlig neue Art von Arbeitnehmern 
heranbilden soll, denn der gute alte Grundsatz der 
Schulmeister von einst, demzufolge wir nicht für 
sie, sondern für das Leben lernen, gilt heute immer 
noch - in vielleicht noch tieferem Sinn. 














Um Ihnen ein Bild von dem 
bieten zu können, was man 
bereits an unseren Schulen 
erkannt und erarbeitet hat, 
um jungen Leuten den Zu- 
gang zur künstlichen Intel- 
ligenz so leicht und ange- 
nehm wie irgend möglich 
zu machen, haben wir uns 
zwei Schulen in Hessen an- 
geschaut und wollen ein 
wenig darüber berichten. 

Warum ausgerechnet Hes- 
sen, werden Sie vielleicht 
fragen? Nun, in diesem 
Bundesland mitten in 
Deutschland übt man sich 
im Mittelmaß: Man ist der 
allgemeinen Entwicklung 
nicht um Meilensteine vor- 
aus, man hinkt auch nicht 
hintendrein - somit kann 
Hessen für die Situation an 
den meisten Schulen im 
übrigen deutschsprachigen 
Europa stehen. Wenn wir 
von Mittelmaß sprechen, 
soll das jedoch nicht 
heißen, an den näher unter 
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die Lupe genommenen 
Schulen tue sich nichts. 


Herderschule in Gießen 


”Der Umgang mit Com- 
putern”, so Studiendirektor 
Dieter Scholz von demjeni- 
gen der Gießener Gym- 
nasien, an dem man schon 
recht lange experimentiert, 
”ist eine Kulturtechnik, die 
heutzutage von einem ge- 
wissen schulischen Bil- 
dungsstand an einfach 
selbstverständlich ist.” So, 
wie er heute spricht, dachte 
er bereits Anfang der Sieb- 
ziger Jahre, als er miteinem 
vorsintflutlichen Loch- 
kartenleser den Eltern- 
beirat von der Notwendig- 
keit überzeugte, ein wenig 
in die Informatik zu inve- 
stieren. Und das war zu- 
nächst gar nicht so ein- 
fach. 

Heute leuchtet es natür- 
lich jedem ein, daß ohne 











Rechner in Sachen Zu- 
kunft nicht viel läuft - da- 
mals verwies man die Com- 
puter noch gern in die In- 
dustrie, weil nur ein paar 
betuchte Außenseiter einen 
Programmierbaren zu- 
hause stehen hatten. 
Dieter Scholz argu- 
mentierte, beschwor und 
versuchte, den Spieltrieb 
des einen oder andern 
Vaters anzusprechen: Und 
siehe da - er hatte Erfolg. 
Bald standen zwei solide 
Lehrgeräte mit Monitor in 
einem Physik-Übungsraum, 
der dann mehr und mehr 
zur Experimentierlaube 
der Informatiker wurde. 
Und heute gibt es sogar ein 
regelrechtes Schulfach In- 
formatik, das Herr Scholz 
mit seinen Kollegen Klein 
und Dr. Zimmermann 
betreut. 

Inzwischen sind auch die 
beiden Terminals von einst 
nicht mehr allein. Dank der 





Einsicht des Elternbeirats 
verfügt man inzwischen 
auch über mehrere Apfel, an 
denen jeweils immer zwei 
bis drei Schüler gleichzeitig 
arbeiten. Aus staatlicher 
Förderung stammen ledig- 
lich zwei Geräte, was uns 
zu der Frage veranlaßt, 
ob es an verantwortlicher 
Stelle auf kommunaler oder 
Landes-Ebene denn sehr 
an Einsicht mangele. 

”Das kann man sogar nicht 
einmal sagen”, meint der 
Lehrer. "Die Schwerpunkte 
sind lediglich sehr ungleich 
verteilt: So können zum Bei- 
spiel berufsbildende Schu- 
len auf den Zwang zur Mo- 
dernisierung verweisen, der 
aus der Zweigleisigkeit der 
Ausbildung resultiert. 
Wenn die Berufsschüler 
ihre Praktika in den ver- 
schiedenen Unternehmen 
rund um Gießen absolvie- 
ren, haben sie es häufig mit 
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modernsten Anlagen zu 
tun, die von der jeweiligen 
Firma auf dem neuesten 
technischen Stand ge- 
halten werden. Dann kom- 
men sie in die Schulen und 
stehen vor Geräten, mit de- 
nen sie meist nicht mehr 
viel anfangen können. Also 
wird von der Schulleitung 
eine neue Anlage be- 
antragt, die mitunter Hun- 
derttausende kosten kann. 
Und die wird auch be- 
willigt.” 
Allgemeinbildende Schulen 
hingegen haben es da 
schwer: Wenn sie einen 
einfachen Personalcom- 
puter benötigen, wird 
meist abgewunken und auf 
die ohnehin hohe Verschul- 
dung verwiesen. 

Doch weil der Geldmangel 
chronisch ist, hat man ge- 
lernt, mitihm zu leben. Das 
Schulfach Informatik kann 
dennoch stattfinden - Ab- 
striche müssen allerdings 
gemacht werden. Beispiel 
für so einen Kompromiß ist 
die Klassenarbeit, die ge- 


rade zurückgegeben wurde . 


und also auch im Zeitalter 
der Mikrochips nicht an 
Aktualität verloren hat. 
”Wir würden liebendgern 
dazu übergehen, unsere Ar- 
beiten vor dem Bildschirm 
abzuwickeln,” meint Stu- 
diendirektor Scholz. ”Doch 
dazu müßte für jeden Schü- 
ler ein Computer oder zu- 
mindest ein Terminal 
(Bildschirm und Tastatur) 
vorhanden sein. Das ist 
freilich noch Zukunfts- 
musik, weshalb wir brav in 
der Klasse bleiben müs- 
sen.” 

Im Klassenzimmer kann 
allerdings nicht alles statt- 
finden: Informatikarbeiten 
können im Gegensatz zum 
Rechnerdialog nur ver- 
gleichsweise simple Aufga- 
ben zum Gegenstand ha- 
ben. So wird zum Beispiel 
die Aufgabe gestellt, einen 
einfachen Algorithmus zu 
entwickeln, der etwas be- 
stimmtes leisten muß, was 
vom Lehrer genau beschrie- 
ben wird. Im Grunde ist 
das _Programmierarbeit 
ohne Computer, nur mit 
Bleistift und Papier - so, 
wie jeder erfahrene Pro- 
grammierer mit der Ent- 
wicklung seines Program- 
mes beginnt. Was fehlt, ist 
das Austesten. 

Welche Sprache würden 
Sie als für Schüler am geeig- 
netsten ansehen?, fragen 
wir die Lehrer der Herder- 
schule. Die Antwort war 
die, die wir immer zu hören 
bekommen, wenn wir Pä- 
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dagegen um ein Urteil in 


Sachen Programmier- 
sprache bitten: Pascal! 
Weshalb nicht Basic?, wol- 
len wir wissen. Informatik- 
lehrer Klein steht Ant- 
wort:”Nun, für die ersten 
Kontakte mit dem Com- 
puter besitzt Basic durch- 
aus einen hohen Wert. Es ist 
in wenigen Stunden bis Ta- 
gen erlernbar und sehr pla- 
stisch. Durch seine Un- 
kompliziertheit jedoch for- 
dert es indirekt zum 
Schludern und Schlampen 
beim Abfassen eines Pro- 
grammes auf. Wer nicht 
von Natur aus ein Ord- 
nungsfanatiker ist, kommt 
allzu leicht in die Ver- 
suchung, sein Programm 
wie Kraut und Rüben zu- 
sammen zu schustern. Das 
taugt nicht für den Unter- 
richt, wo hinter der ak- 
tuellen Problemlösung ja 
der Wunsch steht, dem 
Lernenden tiefere Einsich- 
ten in die Logik des Rech- 
ners zu vermitteln.” 

Dr. Zimmermann, der 
Dritte im Bunde, meldet 
sich zu Wort. "Ganz 
richtig,” meint er. "Stellen 
Sie sich nur einmal vor, wie 
Sie ein Basic-Programm 
prima ausbessern können, 
wenn Sie.es schon vom An- 
satz her verkorkst haben. 
Ein paar Unterprogramme 
- hier ein GOSUB, dort ein 
GOTO - und Sie kriegen 
das Ganze schon irgendwie 
zum Laufen.” 

Bei Pascal haben Sie doch 
auch eine ganze Palettevon 
Möglichkeiten, ein feh- 
lerhaftes Programm zu 
korrigieren. Ist das nicht 
dasselbe? 

”Nein, trotz aller Proce- 
dures, die Sie in Pascal ein- 
fügen können, muß Ihr 
Programm vom Aufbau her 
stimmen, es muß struk- 
turiertsein. Sie müssen sich 
zu Anfang genau überle- 
gen, in welcher Reihenfolge 





Sie vorgehen werden. Das 
zwingt Sie zu systemati- 
schem Denken, also genau 
zu dem, was wir in der 
Schule, namentlich im Infor- 
matik-Unterricht, lernen 
wollen.” 

Wie sieht es eigentlich mit 
den Interessen der Schüler 
aus, die Informatik als Kurs 
belegen? Sind sie alle 
Mathe-Asse? 

”Gut, daß Sie diese Frage 
stellen,” meint Herr Klein, 
”denn Sie sprechen damit 
ein unseliges Vorurteil an, 
gegen das wir immer wieder 
zu Felde ziehen müssen. 
Mathematik und Infor- 
matik sind zweierlei. Der 
Umstand, daß die Ele- 
mente der formalen Logik, 
die wir ausder Mathematik 
kennen, auch in der Infor- 
matik eine Rolle spielen, 
sollte hier nicht ausschlag- 
gebend sein. Denn Sie wol- 
len sicher nicht behaupten, 
daß die Kollegen aus ande- 
ren Fächern allesamt unlo- 
gisch vorgehen.” 

Das ist schon richtig, räu- 
men wirein. Schließlich hat 
die Tatsache, daß die 
Mathematik ohne exakte 
Regeln nicht auskommt 
und deshalb gerade auch in 
Naturwissenschaften im- 
mer wieder benötigt wird, 
dazu geführt, daß man sie 
automatisch auch in diesen 
Bereich schiebt. Wenn Sie 
zehn Leute auf der Straße 
fragen, ob die Mathematik 
eine Naturwissenschaft sei, 
werden neun mit ”ja” ant- 
worten, obgleich die Rech- 
nerei ganz und gar Geistes- 
wissenschaft ist. 

”Genau,” wirft- Herr 
Scholz ein,” leider hat ge- 
rade aber auch wieder diese 
Verbindung der Mathe- 


- matik zu den Naturwissen- 


schaften dazu geführt, daß 
wir Mathematiker und 
Naturwissenschaftler dazu 
bestimmt werden, den In- 
formatik-Unterricht aufdie 


Beine zu stellen. und das 
stempelt die Computerei 
wieder als unnahbar ab." 


Oberstufen-Gymnasium 
Kassel-Oberzwehren 


Diese Diskussion konnten 
wir an der zweiten Schule 
direkt fortführen, wo Ober- 
studiendirektor Dienethal 
und Studiendirektor Mö- 
singer für einen Gesprächs- 
termin mit den verant- 


wortlichen Fachlehrern 
Pohl, Füller und Hinzke 
sorgten. 


In Kassel läuft ein interes- 
santer Modellversuch, der 
seit Mitte 1979 die Möglich- 
keit bietet, parallel zum Abi- 
tur (in Österreich Matura) 
eine konkrete Berufsausbil- 
dung zu erwerben, und 
zwar den Titel eines staat- . 
lich geprüften mathe- 
matisch-technischen Assi- 
stenten (”MaTA”). Dieser 
Versuch wird außer in 
Kassel-Oberzwehren noch 
in Bad Homburg an der 
Georg-Kerschensteiner- 
Schule durchgeführt und 
bringt dem Schüler den ent- 
scheidenden Vorteil, direkt 
nach der Reifeprüfung 
über eine berufliche Quali- 
fikation zu verfügen - ohne 
jeden Zeitverlust. 

Dabei bilden Abitur und 
MaTA-Prüfung eine Ein- 
heit, d.h. erst nach bestan- 
dener Reifeprüfung wird 
der Schüler auch zur 
MaTA-Prüfung zugelassen. 
Abgelegt werden beide ’Eig- 
nungstests’ vor den Prü- 
fungsausschüssen des Ober- 
stufengymnasiums unter 
staatlicher Aufsicht. 
Während der dreijährigen 
Ausbildung zum MaTA wer- 
den auf breiter Basis beruf- 
liche Erfahrungen sowie 
spezielle Mathematik- und 
EDV-Kenntnisse vermit- 
tel. Die Schüler sollen 
nach bestandener Prüfung 
in der Lage sein, in der in- 
dustriellen Datenverar- 
beitung verantwortliche 
Aufgaben zu übernehmen. 
Dazu werden sie parallel 
zur schulischen Ausbil- 
dung auch durch verschie- 
dene Praktika in den Un- 
ternehmen rund um Kas- 
sel vorbereitet. 


Die einzelnen Firmen 


‚stehen dem Projekt, das 


mittlerweile schon fast kein 
”Versuch” mehr genannt 
werden kann, durchaus 
positiv gegenüber: Gerade 
im strukturschwachen Wirt- 
schaftsgebiet Nordhessen 
ist man froh, auf diesem 
Weg qualifizierten Nach- 
wuchs zu erhalten. 


EPU II 


Wir fragten die Fachlehrer 
natürlich, wer für diese 
Ausbildung in Frage kommt. 
"Grundsätzlich hat je- 
der das Recht, von dieser 
Möglichkeit Gebrauch zu 
machen.” sagt MaTA-Spe- 
zialist Pohl. ”Der Teil- 
nahmesindabernatürliche 
Grenzen gesetzt. Da sehr 
viel Mathematik zum 
Lehrstoff gehört, wird sich 
die Teilnahme kaum für je- 
manden lohnen, der schon 
beim kleinen Einmaleins 
Schüttelfrost bekommt. 
Wir wünschen uns Bewer- 
ber, die einen mathe- 
matisch-naturwissenschaft- 
lichen Schwerpunkt vor- 
weisen können, von denen 
wir also erwarten dürfen, 
daß ihnen Mathematik 
Freude macht. Der Spaß 
am Umgang mit dem Com- 
puter allein genügt nicht! 
Daran ändert auch die 
Tatsache nichts, daß die 
praktische Arbeit am schul- 
eigenen Rechner einen 
gezielten Schwerpunkt bil- 
det. Auch der Umstand, 
daß wir neben Fortran und 
Cobol auch viel Basic be- 
nutzen, darf nicht zu der 
‚Ansicht verleiten, daß je- 
der, der zuhause schon mal 
ein Programm in den Com- 
puter getippt hat, gleich der 
Erste ist.” 

”Genau, wir schauen uns 
schon die bisherigen Lei- 
stungen in Mathematik, 
Chemie, Physik, Deutsch 
und Englisch an: danach 
wird ausgewählt. Pro Jahr- 
gang gibts nur eine einzige 
Lerngruppe, weshalb wir 
um eine sorgfältige Prü- 
fung der Bewerber gar nicht 
herumkommen.” 

Nun, wir von CPU finden 
das durchaus fair. Schließ- 
lich wäre es schade, wenn 
einer, der echte Chancen 
hätte, die Ausbildung erfolg- 
reich abzuschließen, un- 
ter Umständen nicht ge- 
nommen würde, nur weil 
ein anderer, der "nur mal 
so” an die Sache herangeht, 
seinen Platz besetzt hält. 
Uns interessiert nun vor al- 
lem, ob angesichts der be- 
sonderen Umstände viel- 
leicht Kompromisse im 
normalen Schulbetrieb, 
d.h. in Fächern, die nicht 
direkt zur MaTA-Ausbil- 
dung zählen, gemacht wer- 
den. Klare Frage: Drückt 
zum Beispiel der Kunst- 
oder Gemeinschaftskunde- 
lehrer ein Auge zu, wenn 
es sich um einen zukünf- 
tigen MaTA handelt? 

”Das wäre ganz gegen den 
Sinn der Sache. Einseitig- 
keit wird ja eben gerade 
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nicht angestrebt.” Mathe- 
matiklehrer Füller wird 
ganz entschieden! ”Im Ge- 
genteil, die Belastung mit 
Wochenstunden ist sogar für 
MaTA-Anwärter geringfü- 
gig höher als bei’normalen’ 
Schülern.” 

Da wir keine Schul- son- 
dern eine Computer- 
zeitschrift machen, interes- 
siert uns aber verständ- 
licherweise weniger der 
Stundenplan als vielmehr 
der Computer, der den 
Schülern zur Verfügung 
steht. Und weil es um eine 
Berufsausbildung geht, ge- 
hen wir von vorn herein 
nicht davon aus, daß wirim 
Informatikraum eins zwei 
Homecomputer vorfinden 
werden. 

Dennoch waren wir über- 
rascht, als wir die gute Aus- 
stattung besichtigten. Da 
gab es eine Hewlett- 
Packard-Anlage (HP 3000) 
mit 1 Megabyte-Festplatte. 
Da standen zwei Disketten- 
laufwerke mit jeweils 170 
MB Kapazität. Zwei Drucker, 
ein Bandlaufwerk, Plotter, 
Lochkartenleser, Graphik- 
Terminal und 19 Bildschirm- 
Arbeitsplätze zählten wir, 
was zusammen eine Anlage 
ergab, die einem mittleren 
Unternehmen gut zu Ge- 
sicht gestanden hätte. 


Zugegeben, zwei Schulen 
können nicht das sein, was 
Meinungsforscher re- 
präsentativ nennen. Den- 
noch legen sie ein infor- 
matives Zeugnis davon ab, 
was heutzutage in der 
Schule an Veränderungen 
möglich ist. 

Was aber noch aussteht, ist 
eine Orientierung des 
Faches Informatik. Gerade 
die Diskussion in Gießen 
hat das deutlich gemacht. 
Solange die Computerwis- 
senschaft (so wird Infor- 
matik etwas einengend in 
Amerika genannt) immer 
noch am Rockzipfel der 
Naturwissenschaft hängt, 
kann sie die eingangs an- 
gerissene Rolle des Com- 
puters in unserer Gesell- 
schaft nicht genügend 
widerspiegeln. 

Wenn der Umgang mit dem 


‘Computer tatsächlich eine 


”Kulturtechnik” ist, wie 
Herr Scholz sagte, dann 
darf er in Gestalt des 
Faches Informatik nicht 
isoliert betrieben werden, 
sondern sollte Bestandteil 
jedes einzelnen Schul- 
faches sein. 

Wenn wir die Vielschichtig- 
keit des Themas richtig er- 
fassen wollen, brauchen wir 


uns nur die Schlagzeilen 


des Alltags anzuschauen. 
Da spricht schon eine 
ganze ’Szene’ von Daten- 
schutz und rebelliert, als sei 
mit der Entwicklung des 
Rechners jedes einzelne 
Bürgerrecht über den Hau- 
fen geworfen. Sehen Sie, da 
haben wir einen Aspekt für 
den Gemeinschaftskunde- 
Unterricht! 

Wenn wir uns die Funk- 
tionsweise einer EDV- 
Anlage verdeutlichen wol- 
len, ist die Physik gefragt. 
Wenn wir die Auswirkun- 
gen eines langfristigen Um- 
gangs mit dem Computer 
auf den menschlichen Or- 
ganismus betrachten (beim 
Arbeiten am Bildschirm 
steigt allein der Vitamin A- 
Bedarf auf das 70-fache), so 
lassen sich ganze Kurs-The- 
men in Biologie for- 
mulieren. 

Das Phänomen der Com- 
puter-Sprachen als Sonder- 
fälle menschlicher Kom- 
munikation gibt Stoff für 
viele Stunden im Fach 
Deutsch. 

Und wenn wir die phanta- 
stiichen Möglichkeiten 
von Computer-Graphik 
und -Musik bedenken, 
gibts sicher Dutzende von 
Ansätzen in den musi- 
schen Fächern. 

Das alles ist sicher richtig, 


wird nun mancher Päda- ° 


goge einräumen. Aber - zu- 
mindest heute noch ein we- 
nig an den Gegebenheiten 
vorbeigedacht. 

Bislang gehört die Infor- 
matik noch nicht zum Be- 
standteil der Lehrerausbil- 
dung. Viele Lehrer, wenn 


sie nicht gerade selbst 
Freaks sind und einen 
Computer besitzen, haben 
einfach nicht die fachliche 
Kompetenz, um  qualifi- 
zierten Unterricht im Fach 
Informatik zu geben. Viel- 
fach sind die Schüler schon 
wesentlich weiter als ihre 
Ausbilder. 

Ein Beispiel ist Deutsch- 
lands jüngster Computer- 
Dozent, der 15jährige Kai 
Ludwig aus Neuss: An der 
Volkshochschule Düssel- 
dorf hält er einen Kurs für 
Führungskräfte über das 
Thema "Der Sinclair ZX-81 
für Basic und Graphik”. 
Die Verantwortlichen woll- 
ten eigentlich, daß Kais 
Vater die Kurse abhalten 
solle. Der, selbst ein Com- 
puter-Fachmann, meinte 
jedoch, sein Sohn könne 
das ohnehin besser als er. 
Aber auch diejenigen Leh- 
rer, die in Sachen Com- 
puter Bescheid wissen, sind 
vielfach eingeengt. Die be- 
stehenden Rahmenrichtli- 
nien für fast alle Fächer 
lassen derzeit nicht allzu 
viel Spielraum: Ein be- 
stimmtes Pensum, das oh- 
nehin.oft zu breit und ver- 
waschen ausgelegt ist, muß 
auf Teufel-komm-raus 
durchgezogen werden - der 
Anschluß an jüngste Ent- 
wicklungen muß da wohl 
oder übel bis zur nächsten 
Kultusminister-Konferenz 
warten.--- 


Wie sieht es eigentlich an 
Ihrer Schule aus? Schrei- 
ben Sie uns! 
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Lebenshilfe aus dem Computer? 

Epson HX-20 Hand-Held Computer 
berechnet Horoskope und Transite/ 
Deutung bleibt dem Menschen überlassen 


Astrologie ist weder. als 
Wissenschaft noch als In- 
strument zur Lebenshilfe 
von allen Seiten anerkannt. 
In jüngster Zeit machen 
Computerhoroskope von 
sich reden. Doch auch für 
sie gilt: Ein Computer kann 
hervorragend Horoskope 
berechnen. Er kann sogar 
einfache Interpretationen 
abgeben. Aber er kann 
nicht abwägen, rückfragen, 
Entscheidungen . treffen, 
die persönliche Eigenart 
des Ratsuchenden ver- 
stehen. Deshalb benützt 
Peter Ripota, Computerex- 
perte und zugleich enga- 
gierter und erfahrener 
Astrologe, einen Epson 
HX-20 Hand-Held Com- 
puter -für die rein mathe- 
matischen Aufgaben der 
Astrologie. 

Der HX-20 führt schwierige 
und umfangreiche Berech- 
nungen durch, die die 
Grundlage auch für detail- 
lierte astrologische Analy- 
sen bilden. 

Meist wünschen Menschen 
eine Beratung, weil sie ir- 
gendwelche Probleme ha- 
ben. Anhand des Pro- 
gramms ”Horoskop” be- 
rechnet der Computer die 
Himmelspositionen der 
Planeten, der Sonne und 
des Mondes zum Zeitpunkt 
der Geburt des Ratsuchen- 


den. Dazu gehören die Be- . 


rechnung von Aszendent, 
astrologischen Häusern, 
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: Aspekten 


(Winkelbe- 
ziehungen zwischen den 
Planeten) und von "Halb- 
summen”. Das sind spe- 
zielle geometrische Planet- 
positionen, die sehr detail- 
lierte Aussagen zulassen. 


. Schon das geht über den 


Umfang einer normalen 
astrologischen Beratung 
hinaus. Wer keinen Com- 
puter hat, müßte viele Stun- 
den an der Berechnung sit- 
zen, viel Übung und mathe- 
matische Kenntnisse haben 
- und dürfte nicht den 
kleinsten Fehler machen. 
Mit dem Rechner sind alle 
Werte in Minutenschnelle 
errechnet. Die Entwicklung 
des Programms hat aller- 
dings viel länger gedauert. 
Es steckt viel Erfahrung 
darin. 

Geburtstage werden über 
die Schreibmaschinenta- 
statur des HX-20 eingege- 
ben. Der "Bildschirm” des 
HX-20 ermöglicht kom- 
fortable Kontrolle und Kor- 
rektur. Die Ergebnisse 
schließlich druckt der 
Computer über den fest 
eingebauten Drucker aus. 
Die Berechnungen sind die 
Grundlage für eine detail- 
lierte astrologische Bera- 
tung. 

Im Laufe einer solchen Be- 
ratung stellt sich meist 
heraus, daß an den Proble- 
men des Ratsuchenden an- 
dere Menschen _ beteiligt 
sind, Partner, Kinder oder 


Vorgesetzte. Der einzig ver- 
nünftige Weg für einen 
seriösen Astrologen führt 
über die Befragung des 
Horoskopes dieses betref- 
fenden Mitmenschen. Doch 
hierzu muß ja wieder ein 
Horoskop berechnet wer- 
den, und dies geht während 
der Sitzung nur mit dem 
Computer. Ohne Com- 
puter müßte die Beratung 
abgebrochen und vertagt 
werden, und die Berech- 
nung des neuen Horosko- 
pes in der von Peter Ripota 
praktizieren Gründlich- 
keit würde einen ganzen 
Tag in Anspruch nehmen. 
Peter Ripota kann sich das 
Horoskop jeder beliebigen 
Person auf Knopfdruck 
vom HX-20 berechnen las- 
sen, wenn er die Geburts- 
daten kennt. Das dauert 
etwa fünf Minuten, und das 
Horoskop z.B. des Partner: 
liegt vor. : 
Ein weiteres Programm 
"Partnerschaftsvergleiche” 
untersucht die beiden Ho- 
roskope und stellt Be- 
ziehungen zwischen ihnen 
fest. Nach wenigen Mi- 
nuten schon kann Peter Ri- 
pota interpretieren: In 
welchen Bereichen behin- 
dern sich die beiden Men- 
schen, wo können sie sich 
fördern, wo gibt es Pro- 
bleme und wo Harmonie. 
Vorausetzung für diese Lei- 
stung ist die schnelle und 
exakte Berechnung der 


Berichte 


horoskopischen Daten 
durch den Computer an 
Ort und Stelle, während der 
Beratung Die persön- 
lichen Horoskopdaten für 
Stammkunden werden auf 
der eingebauten Mikrokas- 
sette gespeichert. 

Jedes so erstellte Horoskop 
liefert exakte Zahlen. Doch 
die Bedeutung der Zahlen 
ist nie eindeutig. Gleiche 
astrologische Werte kön- 
nen für Personen unter- 
schiedlicher Herkunft und 
Lebenskreise verschieden- 
artige Bedeutung haben. , 
Um verläßliche Anhalts- 
punkte für die Inter- 
pretation zu haben, muß 
der ernsthafte Astrologe 
Vergangenheitsvergleiche 
anstellen. Er nimmt be- 
deutsame Ereignisse aus 
dem Leben der Ratsuchen- 
den und untersucht die da- 
malige Planetkonstellation 
("Retrognose”). Hierfür be- 
nützt Peter Ripota sein Pro- 
gramm "”Transite”. Er .be- 
rechnet die Planetenkon- 
stellationen an einem 
beliebigen Tag in der Ver- 
gangenheit oder Zukunft 
und führt Vergleiche mit 
dem Geburtshoroskop 
durch. Der Astrologe ge- 
winnt mit Hilfe des HX-20 
aus der Retrognose ab- 
gesichterte Erfahrungs- 
werte für die Prognose. Da- 
mit reiht sich Peter Ripota 
in die heute anerkannte er- 
kenntnistheoretische Ar- 
beitsweise ein - auch, wenn 
das für ihn ein Nebeneffekt 
ist: Er möchte helfen. Er 
versteht Astrologie als Le- 
benshilfe, genau wie Medi- 
zin oder Psychologie. 

Er arbeitet prinzipiell nur 
noch mit dem Computer. 
Für seine astrologische Ar- 
beit sammelt er die besten 
Erfahrungen mit dem 
Hand-Held: Kein anderer 
Computer bietet alles, was 
der Astrologe braucht, auf 
so wenig Raum. Er kann zu 
jeder Beratung mitgenom- 
men werden, stört nicht 
und braucht keine Kabel. 
Für stille Forschungsarbeit 
im Wochendhaus oder un- 
terwegs ist er der ideale 
Partner, der mit LCD- 
Display, Drucker und Kas- 
settenspeicher ausgerüstet 
ist. Wenn man den Com- 
puter in die Tasche packt, 
braucht man an keinerlei 
andere Peripheriegeräte 
mehr zu denken. 
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Das Zeitalter der 
Knopfdruck 


Über die Schattenseiten der, 


Kennen Sie CHAPS? Die 
fünf Buchstaben stehen für 
das CLEARING HOUSE 
AUTOMATED PAY- 
MENTS SYSTEM und be- 
zeichnen das Zentrale 
Elektronische Zahlungs- 
verkehrssystem der Bank 
von England. CHAPS steht 
auch für ein brandheißes 
Spiel um’s große Geld, das 
Britanniens Hacker seit 
kurzem in Atem hält. 
CHAPS soll den Kunden 
englischer Banken ermög- 
lichen, über normale Fern- 
sprechanschlüsse Über- 
weisungen von Girokonto 
zu Girokonto ohne Lau- 
fereien und Formulare zu 
tätigen. Praktisch ist das 
dem Angebot der Deut- 
schen Bundespost ver- 
gleichbar, die den Inha- 
bern von Postgirokonten 
und Btx-Anschlüssen seit 
geraumer Zeit sogenannte 
PIN’s (persönliche Iden- 
tifikations-Nummern, Er- 
satz für die normale Aus- 
weiskarte) und setweise 100 
TAN'’s (Transaktionsnum- 
mern, 6-stellig, Ersatz für 
die 100 Formblätter in den 
gelben Überweisungsheften) 
zuweist. 

Während das deutsche Sy- 
stem jedoch ‚durch die Be- 
nutzereinschränkung zu- 
mindest im Augenblick 
noch recht hohe Sicherheit 
bietet, sind die Zustände 
für die englischen Com- 
puter-Fans geradezu para- 
diesisch: Da der Zugriff auf 
CHAPS von öffentlichen 
Telefonnetzen aus ermög- 
licht ist, kann der Hackerin 
vielen Fällen ein hohes 
Maß an Anonymität wah- 
ren - und Persönlichkeits- 
schutz ist schließlich ein 
Grundrecht. 

Natürlich sind auch die 
britischen Kreditinstitute 
nicht ganz untätig geblie- 
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ben, um ihre ehrliche 
Kundschaft wie sich selbst 
gegen allzu großen Vermö- 
gensschwund zu schützen. 
So werden die Zugangs- 
leitungen zu CHAPS durch 
elektronische ”keys” ge- 
sichert, die bei geringstem 
Verdacht auf unbefugten 
Zugriffein Schutz-Flag set- 
zen. Dennoch ermittelt 
Scotland Yard gegen ein 
halbes Dutzend Hacker, 
die trotz dieser Maßnah- 
men in CHAPS einge- 
brochen sind. 

Sind in England die Verlu- 
ste noch im Bereich des Er- 
träglichen geblieben, so 
verzeichnen die USA Schä- 


den in wahrhaft amerikani-- 


schen Dimensionen. 

Den bislang größten Coup 
landete der in Kalifornien 
ansässige Harold Rossfields 
Smith bei Wells Fargo: 21,3 
Million USD ergaunerte 
sich der Boxermanagerund 
ehemalige Geschäftspartner 
von Muhammad Ali ge- 
meinsam mit einem findi- 
gen Kopf der Wells Fargo 
Bank, Ben Lewis. 

Smith und Lewis fingierten 
Bankleitzahlen, wie sie in- 
nerhalb des Filialnetzes 
der Wells Fargo of Califor- 
nia benutzt werden.  Da- 
durch konnten Geldbewe- 
gungen horrenten Aus- 
maßes auf zum Teil nicht 
einmal existierende Zweig- 
stellen möglich werden. 
Um die Tarnung zu verbes- 
sern und ihre Taktik un- 
durchsichtiger zu machen, 
gingen die beiden so vor, 
daß Smith sein eigenes 
Girokonto überzog und 
durch Kredite, die Wells 
Fargo scheinbar gewährte, 
ausgleichen ließ. 


Das System fiel weder bei 
der Zentralen Kontenfüh- 
rung noch im Vorstand der 
Bank auf und hätte Smith 
und Lewis ein gesichertes 
Alter|beschert, hätte_der 
Hacker vom Dienst, Ben 
Lewis, nicht eines schönen 
Tages einen simplen Tipp- 
fehler begangen, wodurch 
die betreffende Überwei- 
sung durch die Prüflogik 
des Bank-Computers abge- 
fangen und der ganze 
schöne Schwindel ans Ta- 
geslicht befördert wurde. 
Weniger clever gingen zwei 
andere "Geschäftspartner” 
vor, die ”lediglich” einen 
Schaden in Höhe von 7 
Millionen USD verur- 
sachten. 

Der für die Direktverbin- 
dung zur First Boston Bank 
zuständige Fernschreiber 
beim Credit Suisse, Lau- 
rence Tomsett, baute eine 
Geschäftsverbindung mit 
dem Morgon Guarantee 
Trust in New York auf und 
ließ aus den USA telegra- 
fisch hohe Beträge auf ein 
Konto bei der Genfer 
Zweigstelle des Bankhau- 
ses Lemui leiten, wo Kom- 
plize Colin Howard die Ge- 
winne einstrich. 

Das System der beiden Te- 
lex Operators basierte auf 
dem etwas naiven, aber zu- 
nächst naheliegenden Ver- 
such, Fernschreiber durch 
Präparierung des Farbban- 
des im Telex-Empfänger zu 
fälschen. Das hätte auch 
geklappt, wenn nicht ein- 
spezielles Sicherungssystem 
























der Bank elektronisc 
sämtliche Transaktionen 
protokolliert hätte, wo- 
durch die beiden Freunde 
aufflogen. 

Wenn in den beiden vorlie- 
genden Fällen echte Insi- 
der am Werk gewesen sind, 
so darf dies nicht darüber 
hinwegtäuschen, daß immer 
mehr Jugendliche, ja sogar 
Kinder in Computernetze 
eindringen. 

Die Akten der Staatsan- 
waltschaften in diversen 
US-Bundesstaaten können 
Bände mit Einzelschicksa- 
len füllen, die in geradezu er- 
schreckendem Ausmaß die 
Chance verdeutlichen, 
auch an geheimste Daten 
heran zu kommen. 

So entdeckten erst kürzlich 
mehrere junge Computer- 
Freaks in Milwaukee, daß 
sie praktisch durch Zufall 
in das Info-Netz der 
amerikanischen Telefon- 
gesellschaft GTE einge- 
brochen sind und dadurch 
Zugriff zu mehr als 60 Da- 
tenbanken erhielten. 
Andere gelangten in den 
Zentralcomputer des Mas- 
sachusetts Institute Of 
Technology, wieder andere 
in den Netzverbund des 
McClellan Luftwaffen-Stütz- 
punktes in Sacramento 
(Kalif.) und in die Geheim- 
aufzeichnungen des Kern- 
forschungszentrums von 
Los Alamos in Neu Mexiko. 
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Die Geschichte 





vom ”Ausweg”, 





der zum Irrweg wurde, 
zeigt, wie schnell sich ein 
armer Computer-Freak ins 
Gestrüpp der Paragraphen 
verirren kann. Der ganz 
große Coup wie in Amerika 
ist da gar nicht nötig. 

Viele unserer Leser haben 
sich in Dutzenden von 
Briefen besorgt gefragt, ob 
man sich schon strafbar 
mache, wenn man ab- 
gedruckte Programme auf 
eigene Rechnung verkauft. 
Klar tut man das, müssen 
wir ganz entschieden ant- 
worten: Auch die Veröf- 
fentlichung eines Spielpro- 
grammes darf nicht zu der 
Annahme verleiten, es sei 
frei von Urheberrechten. 
Ganz kriminell wirds dann 
aber, wenn ein Industrie- 
Programm (d.h. ein Pro- 
gramm, das Sie auf Diskette 


oder Kassette bei einem, 


Händler gekauft haben) 
ganz einfach kopiert und 
dann weiterverkauft wird. 
Ein trauriges aber doch 
hoffentlich abschrecken- 
des Exempel lieferte uns die 
allerjüngste Vergangenheit 
quasi frei Haus: 

Sie erinnern sich sicher 
noch an das tolle Spiel 
WAYOUT im Juli-Heft unse- 
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res HOMECOMPUTERS: 
Wenn Sie das abgetippt 
und auf Ihrem C-64 zum 
Laufen gebracht haben, be- 
sitzen Sie eine echte 
Rarität, nämlich ein Origi- 
nal-Commodore-Programm, 
das in den USA ein wahrer 
Renner war und jetzt auch 
auf dem deutschen Markt 
ein großer Erfolg werden 
sollte. 

WAYOUT war uns von 
dem 17 Jahre alten Oliver 
Quartzfeld aus Bamberg* 
als selbst geschrieben zu- 
gesandt worden. Wir hatten 
es geprüft, als geeignet ein- 
gestuft und in Druck gehen 
lassen. So weit - so gut! 
Nun freuen wir uns immer, 
wenn Leser bei uns anrufen 
und zu dem einen oder an- 
deren Spiel Stellung neh- 
men. Sie können sich aber 
gut vorstellen, daß wir we- 
nig begeistert waren, als die 
Firma Media-Data aus 
Castrop-Rauxel bei uns 
vorsprach, und erklärte, die 
deutschen Rechte für "WAY- 
OUT” zu besitzen. ; 
Media-Data hatte das Co- 
pyright gekauft und plante 
die Herausgabe in Deutsch- 
land für Commodore- und 
ATARI-Computer. Die Co- 





Sicher, so etwas wäre bei 
uns wohl kaum möglich, da 
weniger technische als viel- 
mehr behördliche Schran- 
ken eine ganze Kompanie 
von Riegeln einem Miß- 
brauch vorschieben. 

Dennoch kann es nicht 
ausgeschlossen werden, daß 
auch in diesem Augenblick, 
in dem Sie den vorliegen- 
den CPU-Bericht lesen, 
Millionen von Mark. Schil- 








Single Sided, 
Single Density, 
Soft-sectored 
with Hub Ring 


MD1 
CC-8601-390 


“Name und Ort wurden geändert. Evtl. Überein- 
stimmung mit einer tatsächlich existierenden 
Person wäre unbeabsichtigt und rein zufällig. 


vers für die Neu-Erwer- 
bung waren bereits ge- 
druckt - 

da kam HOMECOMPU- 
TER und brachte das Li- 
sting - rund 175.000 Leser 
in Deutschland, Österreich, 
der Schweiz und den Bene- 
lux-Ländern sind somit in 
den Besitz eines tollen 
Spielprogramms gelangt, 
ohne es zum Normalpreis 
erwerben zu müssen. 

Da erstaunt es natürlich 
nicht, wenn die geschädigte 
Firma nun bei Olivers 
Eltern vorsprach und 
eine gesalzene Rechnung 
präsentierte. Mindestens 
150.000 DM werden sie ab- 
zustottern haben - für Oli- 
ver kommt sogar zusätzlich 
noch ein Strafantrag ins 
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ling oder Franken trans- 
feriert werden, ohne daß 
eine Bank in Deutschland, 
Österreich und der Schweiz 
davon Wind bekäme, ge- 
schweige die jeweiligen 
Bundesbanken. 

Schauen Sie in den näch- 
sten Tagen mal bei Ihrer 
Bank vorbei - vielleicht 
stehen 20 Millionen mehr 
auf Ihrem Konto... 





Haus. 

Sie sehen, wie einscheinbar 
harmloses Vergnügen böse 
enden kann. Und Recht 
muß man den Geschä- 
digten- überdies auch ge- 
ben. Schließlich ist die In- 
vestition in derartige Pro- 
jekte zu groß, um die 
möglichen Schäden auf 
dem Kulanzweg regeln zu 
können. 
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Supercode ist ein Logikspiel, welches dem bekann- 


ten Mastermind nachempfunden ist. 

Man kann es zu zweit oder auch allein spielen. In 
maximal acht Schritten muß ein Spieler versuchen, 
eine verdeckte 4-Farben-Kombination zu erraten; 
dabei müssen Farben und Reihenfolge der gerate- 
nen Kombination mit der versteckten Kombination 


übereinstimmen. 


Es stehen insgesamt sechs Farben zur Verfügung, 
die beliebig miteinander kombiniert werden 


können. 


Nach dem Laden des Programmes er- 
scheint auf dem Bildschirm die An- 
frage, ob allein oder zu zweit gespielt 
werden soll. Tippt man 1, so versteckt 
der Computer unsichtbar hinter der 
Abdeckung seinen Code. Durch ein 
Akustikzeichen werden Sie aufgefor- 
dert, ihren Tip abzugeben. Sollten Sie 
sich einmal vertippt haben, so geben 
Sie die vollständige Kombination ein 
und betätigen danach die = Taste. Die 
Kombination ist nun gelöscht, und Sie 
können eine neue eingeben. 

Haben Sie alles richtig eingetippt, so 
drücken Sie die Space-Taste. 

Nun gibt der Computer Ihnen Hilfen. 
Er setzt kleine weiße und schwarze 
Steine. 

Setzt der Computer einen schwarzen 
Stecker, so bedeutet dies, daß ein Stein, 
der von Ihnen gesetzten Kombination, 
in Farbe und Position mit einem ver- 
stecktem Stein übereinstimmt. Setzt der 
Computer einen weißen Stein, so istnur 
die Farbe eines Steckers auch in der 
versteckten Kombination enthalten, je- 
doch ist die Position dieses Steckers 
noch falsch. Setzt er keinen Stein, so ist 
auch keine Farbe richtig. 

Das Spiel ist zu Ende, wenn Sie die 
Kombination erraten haben oder dies 
in acht Schritten nicht geschafft haben. 
Danach fragt der Computer Sie, ob Sie 
noch einmal spielen wollen. 

Drücken Sie beider Spielwahl 2, so wer- 
den Sie gebeten, die Anzahl der Run- 
den, die Sie spielen wollen, festzulegen 
(bis zu 1000). Danach werden die Vor- 
namen der Teilnehmer eingegeben. 
Spieler 1 übernimmt die Funktion des 
Computers. Er versteckt die Kombi- 
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nationen, dieer durch Space verdecken 
und durch = wieder löschen kann. Da- 
nach muß Spieler 2 die Kombinationen 
eingeben. Nach einem Akustikzeichen 
übernimmt Spieler”?2 die Kommentar- 
funktion des Computers, wobei der 
Computer immer verdeckt mitspielt. Er 
kontrolliert die Eingaben. des Spielers 
1. Fehler sind nicht möglich, denn der 
Computer macht die Spieler sofort dar- 
auf aufmerksam. Nach einem Spiel- 
durchgang werden die Aufgaben ge- 
tauscht. Zuvor werden noch die Aufga- 
ben der Spieler, die Anzahl der 
gespielten Runden und der Spielstand 
angezeigt. 


Die Punktezählung: 

Errät der Spieler die Kombination 
nicht, so erhält er auch keine Punkte. 
Errät er sie beim achten Schritt, so er- 
hält er zwei Punkte. Für jeden Schritt, 
den er weniger braucht, erhält er zwei 
Punkte mehr. Irrt sich der andere Spie- 
ler unabsichtlich oder absichtlich(!), so 
erhält der ratende Spieler für jeden 
Irrtum nochmals vier Punkte. 

Das Spiel ist dann zu Ende, wenn die 
gewählte Rundenzahl gespielt worden 
ist. Danach erfolgt wieder die Anfrage, 
ob noch einmal gespielt werden soll. 
Aus technischen Gründen ist der 
Programm-Text in englischer Sprache 
(weil kürzer!) geschrieben. 

Das Programm sollte mit niederge- 
drückter Alphalock-Taste program- 
miert und gespielt werden. 


Programmablauf: 
50-1650: Zeichencodedefinition 
1700-2500: Farbbelegung für den 
Spielanfang 
2550-4650: Anfragen für den späteren 
Spielverlauf . 

4700-9200: Aufbau des Spielbrettes 
9250-30000: Hauptprogramm 
24750: Anfrage, ob ein neues Spiel ge- 


für den TI-99/4A 


wünscht wird 


Variablenliste: A 
K: Rückmeldevariable in Key-Unter- 
programm 

S: Statusvariable in Key-Unterpro- 
gramm 

A: Anzahl der Mitspieler 

B: Anzahl der schwarzen Steine, die der 
Computer berechnet 

W: Anzahl der weißen Steine, die der 
Computer berechnet 

D: Punktestand 

E: Punktestand 

F: Rundenzahl 

G: Fester Wert (wird für den Ausdruck 
der Rundenzahl benötigt) 

H=: String zur Identifikation des Spie- 
lers, der die Steine versteckt 

I, J: Zählvariable in FOR-NEXT- 
Schleifen 

L=: String für den Spieler, der die Far- 
ben rät 

M: Schrittanzahl 

N,O,P,Q: Variable zur Berechnung 
von schwarzen und weißen Steinen 
CL(I), CD: Computerberechnete 
Farbwerte 

PLI=: Name des Spielers 1 

PL2=: Name des Spielers 2 

SO: Zeile, wo auf Knopfdruck ein Stein 
erscheinen soll 

SX: Spalte, wo auf Knopfdruck ein 
Stein erscheinen soll 

SP: Momentane Zeilennummer 
SID,ST(W: Farbcode, der 
Spieler gedr. Tasten 

WB: Anzahl der schwarzen Steine, die 
PLI$ angibt 

WW: Anzahl der weißen Steine, die 
PLi$angibt 


vom 
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50 REM SUPERCODE 
FUER TI 99/4A 

160 REN 

150 REM MATTHIAS NOLTE 

KLAUSBERGWEG 11 

3206 LAMSPRING 

E 

26@ RANDOMIZE 

250 CALL SCREEN(2) 

360 CALL CHAR (59. "0010202020 

20198." ) 

350 CALL CHAR (60, "3008040404 

640830") 

400 CALL CHAR (61, "0044442810 

161810") 

450 CALL CHAR (62, "0102040810 

204088") 2 

566 CALL CHAR (91, "SC7AFFFFFF 

3C18") 

556 CALL CHAR (92, "603C7E7ESC 

1818") 

66 CALL CHAR (96, "SC7AFFFFFF 

3C18") 

650 CALL CHAR (104, "SC74FFFFF 

FSC18") 

700 CALL CHAR(112, "SC7AFFFFF 

FSCIB") 

756 CALL CHAR(113, "00003E42B 

F423C") 

806 CALL CHAR (114, "000600006 

@BOSCIC") 

850 CALL CHAR (115, "003C7E7ES 

c1818") 

90@ CALL CHAR (126, "SC7AFFFFF 

FSC1B") ; 

950 CALL CHAR(128, "SC74FFFFF 

FSC18") 

1066 CALL CHAR(136, "BOCOEOF® 

FBFCFEFF") 

1050 CALL CHAR (137, "FFIFSFIF 

OF070301") 

1106 CALL CHAR (138, "0103070F 

1FSFFFFF") 

1156 CALL CHAR (139, "FOFOFOFO 

FAFCFEFF") 

1260 CALL CHAR(148, "COCOEGEO 

EBEGEOF") 

1256 CALL CHAR (141, "80868080 

BOCELOCE" ) 

1306 CALL CHAR (144, "FF") 

1350 CALL CHAR (145, "80482010 

68046201") 

1406 CALL CHAR (146, "FF808086 

80808080") 

1450 CALL CHAR(147,"8640201F 

08040201") 

1500 CALL CHAR (148, "00006006 

or") 

1550 CALL CHAR(149, "9056301F 

») 

1660 CALL CHAR (150, "46402020 

20202020") 

1656 CALL CHAR (151, "80868086 

89404040") 

1706 CALL CLEAR 

1756 CALL COLOR(1,11,1) 

1860 CALL COLOR(2,15,2) 

1856 CALL COLOR (3,7,1) 

19660 CALL COLOR (4,7,1) 

1950 CALL COLOR (5,7,1) 

2006 CALL COLOR(6,12,1) 

2650 CALL COLOR(7,11,1) 

2108 CALL COLOR (8, 11,1) 

2150 CALL COLOR (9, 2,2) 

2200 CALL COLOR(10,2,2) 

2250 CALL COLOR(1142,2) 

2300 CALL COLOR(12,2,2) 

2356 CALL COLOR(13,2,2) 

2460 CALL COLOR(14,2,2) 

2450 CALL COLOR(15,2,2) 

2500 CALL COLOR(16,2,2) 

2550 CALL SCREEN(2) 

2600 PRINT " SUPERCODE" 

2650 PRINT 

2700 PRINT "GAME FOR ONE(1) 

OR" 

2750 PRINT "TWO(2) PLAYERS ? 
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2800 PRINT 

2850 PRINT "PLEASE PRESS 1 0 

RaZIR 

2900 PRINT 5 

2950 CALL KEY(®,K,5) 

3060 IF 5=® THEN 2950 

3050 IF K<>49 THEN 3350 

3100 CALL HCHAR(24,3,K) 

3150 A=ı 

3200 FOR I=1 TO 260 

325@ NEXT I 

3300 GOTO 4706 

3350 IF K<>50 THEN 2950 

3490 D=0 

3450 E=6 

350@ CALL HCHAR(24,3,K) 

3550 A=2 

3600 FOR I=1 TO 206 

3650 NEXT I 

37909 CALL CLEAR 

3750 PRINT "NUMBER OF ROUNDS 

you" 

3860 INPUT "WANT TO PLAY 
(UP TO 1008): ": 

F 

3856 F=INT(F) 

3900 IF F<=0 THEN 3700 

3950 IF F>1000 THEN 3700 

4900 F=F*2 

4050 G=F/2+1 

4100 PRINT 

4150 PRINT "GIVE ME YOUR FIR 

st" 

4200 PRINT "NAMES PLEASE!" 

4250 PRINT 

4306 INPUT "PLAYER 1: ":PLi% 

4350 IF PLi$="" THEN 4300 

4400 IF LEN{PL16)<4 THEN 430 

o 

4450 INPUT "PLAYER 2: "ıPL2% 

4500 IF PL2$="" THEN 4456 

4559 IF LEN(PL26)<4 THEN 445 

© 

4606 H$=PL1% 

4650 L$=PL2$ 

4700 CALL CLEAR 

4750 CALL COLOR (2,2,2) 

4800 CALL HCHAR(1,12,80) 

4856 CALL HCHAR(1,13,76) 

49@0 CALL HCHAR(1,14,69) 

4950 CALL HCHAR (1, 15,65) 

5000 CALL HCHAR(1,16,83) 

5050 CALL HCHAR(1,17,69) 

5108 CALL HCHAR(1,19,87) 

5150 CALL HCHAR(1,20,65) 

5206 CALL HCHAR(1,21,73) 

5250 CALL HCHAR(1,22,84) 

5300 IF A=2 THEN 6200 

535@)CALL HCHAR (2, 9,73) 

5400 CALL HCHAR(2,10,39) 

5450 CALL HCHAR (2, 11,77) 

5500 CALL HCHAR(2, 13,67) 

5550 CALL HCHAR (2, 14,72) 

56900 CALL HCHAR (2, 15,79) 

5659 CALL HCHAR (2, 16,79) 

5700 CALL HCHAR (2, 17,83) 

5750 CALL HCHAR(2, 18,73) 

5800 CALL HCHAR (2, 19,78) 

585@ CALL HCHAR (2, 20,71) 

5908 CALL HCHAR (2, 22,67) 

5950 CALL «HCHAR (2, 23,79) 

660@ CALL HCHAR (2,24,76) 

6050 CALL HCHAR (2, 25,79) 

610@ CALL HCHAR (2, 26,82) 

6150 CALL HCHAR (2, 27,83) 

6200 CALL HCHAR (23,22, 146) 

6250 CALL HCHAR (23,23, 144,9) 

6390 FOR I=7 TO 21 

635@ CALL HCHAR(1,1+2,49,7) 

6400 NEXT I 

6450 CALL HCHAR (22, 22,40, 9) 

6500 FOR I=1 TO 18 

6350 CALL HCHAR(4+1,13+1,136 

) 


6666 NEXT I 
6650 FOR I=1 TO 18 


6790 
6750 
6866 
6850 
6999 
6950 
7098 
7050 
7190 
7150 
7290 
7250 
7396 
7350 
7496 
7456 
7509 
7550 
7680 
7656 
7798 
7750 
7800 
7850 
7998 
7950 
8006 
8050 
8100 
8156 
8206 
8256 
2) 

8306 
8350 
8406 
8456 
8500 
8550 
8608 
8650 
8760 
8750 
8860 
8850 
8900 
8956 
9000 
9050 
9108 
9150 
9200 
9259 
9300 
9350 
94006 
9450 
9506 
9550 
9600 
9656 
9790 
9750 
9806 
9856 
9998 
9950 


CALL HCHAR (4+1,3+1, 145) 
NEXT I 

FOR I=1 TO 18 

CALL HEHAR (5+1,3+1,137) 
NEXT I 

IF A=2 THEN 7708 

CALL. HCHAR (6,6, 148) 
CALL HCHAR (6, 7,149) 
CALL HCHAR (6,8, 148,7) 
CALL HCHAR (5,7, 150) 
CALL HCHAR (4,7, 151) 
CALL HCHAR (4,6, 138) 
CALL. HCHAR (5, 6,145) 
CALL HCHAR (5, 5,40) 
CALL: HCHAR (6, 15,139) 
CALL HCHAR (5, 15,140) 
CALL” HCHAR (4,15,141) 
CALL HCHAR(4,8,40, 73 
CALL HCHAR (5,8,40,7) 
G0TO 7950 

CALL HCHAR (5,5,40,9) 
CALL HCHAR (6,8,40,7) 
FOR I=1 TO 7 STEP 2 
CALL HEHAR (5,6+1,113) 
NEXT I 

FOR I=8 TO 14 STEP 2 
FOR J=1 TO 16 STEP 2 
CALL HCHAR (J+6, I#J, 113) 
NEXT J 

NEXT I 

FOR I=1 TO 16 

CALL HCHAR(I+5, 145,114, 


NEXT I 

CALL HCHAR(1,1,32,50) 
CALL HCHAR(2,1,32,30) 
CALL COLOR(1,2,1) 
CALL COLOR(2,7,7) 
CALL COLOR(3,2,1) 
CALL COLOR(4,2,1) 
CALL COLOR(5,2,1) 
EALL COLOR(6,2,1) 
CALL COLOR (7,2,1) 
CALL COLOR (8,16,7) 
CALL COLOR(9,12,7) 
CALL COLOR(16,9,7) 
CALL COLOR(11,2,79 
CALL COLOR(12,13,7) 
CALL COLOR(13,8,7) 
CALL COLOR(14,7,1) 
CALL COLOR(15,16,7) 
CALL COLOR(16,16,7 
CALL SCREEN (4) 

IF A>=2 THEN 10406 
FOR I=1 TO 4 
CtI)=INT(&*RND) +1 
NEXT I 

FOR I=1 T0 4 

IF C(I)>1 THEN 9706 
c(D)=2 

G0TO 19356 

IF C(1)>2 THEN 9850 
ciD)=12 

GOTO 19350 

IF C(1)>3 THEN 10006 
c(D)=9 

GOTO 10350 


10000 IF C(I)>4 THEN 10150 
10056 C(T)=16 

1010@ GOTO 10350 

10150 IF C(I)>5 THEN 10306 
16200 C{T)=13 

10250 G0TO 10356 

10306 C(1)=8 

10356 NEXT I 

10400 IF A<>2 THEN 11800 
10450 FOR I=1 TO 4 


10560 CALL HEHAR (1,2+1,ASC(S. 


EG$(H$,1,4))) 
10550 NEXT I 

1060@ CALL HCHAR (1,7,58) 
10656 CALL HCHAR(1,9,83) 
1070@ CALL HCHAR(1,10,69) 
19756 CALL HCHAR(1,11,84). 
10800 FOR I=1 TO 4 

1685@ CALL HCHAR (2,2+1,ASC(S 
EG$(L$,1,4))) 


16966 NEXT I 

10950 CALL HCHAR(2,7,58) 
11000 CALL HCHAR(2,9,71) 
11050 CALL HCHAR(2, 10,85) 
11100 CALL HCHAR(2, 11,69) 
1115@ CALL HCHAR(2,12,83,2) 
11266 CALL HCHAR(20,3,82) 
11250 CALL HCHAR (20,4,79) 
11360 CALL HCHAR(20,5,85) 
11350 CALL HCHAR (20, 6,78) 
11460 CALL HCHAR (20,7,68) 
11450 IF F/2<>INT(F/Z)THEN 1 
1650 

11500 FOR I=1 TO LEN(STR$(G- 
F/2)) 

11550 CALL HCHAR (20, 8+1,ASC( 
SEG$ (STR$ (G-F/2) , I,LEN(STR$( 
6-F/2)))) 

11660 NEXT I 

11656 50=7 

11700 SX=5 

11756 G0TO 11956 

11800 N=0 

11856 S0=23 

11966 5X=21 

11956 LET SP=SO 

12000 CALL SOUND (108,292, @) 
12056 FOR I=1 TO 4 

121800 CALL KEY(6,K,5) 

12150 IF S=6 THEN 12190 
12260 ST(I)=K-48 ' 

12256 IF ST(I)<1 THEN 12100 
12300 IF ST(I)>6 THEN 12106 
12350 ON ST(I)GOTO 12450, 126 
00, 12750, 12900, 13050, 13200 
12400 GOTO 12100 

12456 ST(D)=2 

12560 CALL HCHAR(SX,SP,112) 
12556 GDTO 13300 

12600 ST(1)=12 

12650 CALL HCHAR(SX,SP, 96) 
12700 GOTO 13300 

12756 ST(1)=9 

12860 CALL HCHAR (8X,SP, 104) 
12856 GOTO 13300 

12900 ST(N)=16 

1295@ CALL HCHAR (SX,SP,91) 
13060 GOTO 13306 

13050 ST(D=13 

13100 CALL HCHAR(SX,SP, 120) 
13150 60TO 13306 

13260 ST(1)=8 

13250 CALL HCHAR(SX,SP,128) 
13360 SP=SP+2 

13350 IF SP=S0+8 THEN 13450 
13400 NEXT I 

13450 CALL KEY(6,K,5) 

13560 IF S=@ THEN 13450 
13550 IF K=61 THEN 13650 
13600 IF K=32 THEN 13800 ELS 
E 13450 

13656 FOR I=0 TO 6 STEP 2 
13700 CALL HCHAR (SX,80+1,113 
) 

13750 NEXT I 

13860 IF A<2 THEN 14300 
13856 IF A=4 THEN 14250 
13990 A=3 

13950 IF K<>32 THEN 14256 
14966 FOR I=1 TO 4 

14850 LET C(D)=ST(D 

14160 NEXT I 

14150 A=4 

14200 G0TO 7000 

14250 IF K=61 THEN 11950 
14366 IF K<>61 THEN 14400 
14356 GOTO ‚11950 

14400 B=6 

14456 M=M+1 

14500 P=30 

14550 0=100 

14666 FOR I=1 TO 4 

14656 LET CL{D=C(I) 

14798 LET SI(D=STD 

14750 IF ST(D<>CCDITHEN 151 
so 


13806 LET CL{iDI=C(T) 
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14850 
149006 
14950 
15000 
15056 
15108 
15150 
15200 


LET SI(D=STEN 
BeB+1 

LET S1(D)=P 
LET CLiDI=Q 
P=P+2 

0=0+2 

NEXT I 

u=o 


15250 N=40 

15300 0=76 

15356 FOR I=1 TO 4 

15400 FOR J=1 TO 4 

15450 IF SICD<>EL(WITHEN 15 
756 

15508 W=W+l 

15550 S1(DI=N 

156060 CL(J)=0 

15650 N=N+1 

15700 0=0+1 

15750 NEXT J 

15800 NEXT I 

15850 IF A=1 THEN 20100 
15900 WB=6 

15950 WW=6 

16600 CALL SOUND (100.392,0) 
16050 CALL KEY(0,K,S) 

16100 IF S=® THEN 16056 
16150 IF K=32 THEN 19066 
16206 IF K<>49 THEN 16350 
16250 Z=115 

16300 GDTO 16450 

16350 IF K=52 THEN 16400 ELS 
E 16056 

16408 7=92 

16450 CALL HCHAR(SX-1,50-3,2 
) 

16566 IF Z=115 THEN 16550 EL 
SE 16650 

16550 WB=WB+1 

16606 GOTO 16766 

16650 WW=WW+1 

16700 CALL KEY(6,K,5) 

16750 IF S=® THEN 16706 
16800 IF K=32 THEN 19006 
16850 IF K=49 THEN 16900 ELBE 
E 17000 

16900 Z=115 

16956 -60T0 17180 

17800 IF K=52 THEN 17056 ELS 
E 16706 

17056 7=92 

17100 CALL HCHAR (5X-1,50-2,7 


N) 

17156 IF Z=115 THEN 17200 EL 
SE 17306 

17200 WE=WB+1 

17256 GDTO 17356 

17300 WW=WW+1 

17358 CALL KEY(6,K,5) 

17400 IF S=@ THEN 17350 
17450 IF K=32 THEN 19006 
17506 IF K=49 THEN 17550 ELS 
E 17650 

17550 Z=115 

176008 GOTO 17750 

17650 IF K=52 THEN 17700 ELS 
E 17356 > 
17700 7=92 

17756 CALL HCHAR (5X,50-2, 2) 
17806 IF Z=115 THEN 17850 EL 
SE 17950 

17856 WB=WB+1 

17900 GDTO 18000 

17956 WW=WW+1 

18660 CALL KEY(0,.K,S) 

18050 IF S=@ THEN 18006 
18106 IF K=32 THEN 19606 
18156 IF K=49 THEN 18206 ELS 
E 18300 

18206 7=115 

18250 GOTO 18496 

18306 IF K=52 THEN 18350 ELS 
E 18066 

18350 7=92 

18400 CALL, HCHAR (5X,S0-1,2) 
18450 IF Z=115 THEN 18500 EL 
SE 18506 
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18506 WB=WB+! 

18556 GOTO 18450 

18606 WU=WW+L 

18656 CALL KEY(0,.K,S) 

18706 IF S=® THEN 18656 
18750 IF K=32 THEN 190008 ELS 
E 18806 

18866 IF K=&1 THEN 18856 ELS 
E 18656 

18850 CALL HCHAR(SX-1,50-3,1 
14,2) 

18906 CALL HCHAR (5X,S0-2,114 
2) 

18950 GOTO 15960 

19600 IF WB<>B THEN 19150 EL 
SE 19050 

19050 IF WW<>W THEN 19150 EL 
SE 19106 

19100 IF WB=4 THEN 20700 ELS 
E 27906 

19150 IF L$<>PL1% THEN 193006 
19206 D=D+4 

19250 GOTO 19350 

193060 E=E+4 

19356 CALL HCHAR(1,3,68) 
1940@ CALL HCHAR(1,4,79) 
19450 CALL HCHAR (1,5,78) 
19500 CALL HCHAR(1,6,39) 
19556 .CALL HCHAR (1,7,84) 
19600 CALL HCHAR (1,9,67) 
19656 CALL HCHAR(1,10,72) 
19708 CALL HCHAR(1,11,69 
19750 CALL HCHAR(1,12,65) 
19800 CALL HCHAR (113,84) 
19850 CALL HCHAR(1,15,33) 
19900 FOR I=1 TO 360 

19950 NEXT I 

2000@ CALL HCHAR(1,1,32,32) 
20050 GOTO 18850 

20100 IF B>@ THEN 20206 
20150 GOTO 27200 » 
20260 IF B>1 THEN 20356 
20250 CALL HCHAR (SX-1,50-3,1 
15) 

20360 GOTO 27200 

20356 IF B>2 THEN 20500 
26406 CALL HCHAR (SX-1,50-3,1 
15,2) 

20450 GOTO 27200 

20500 IF B>3 THEN 207006 
20550 CALL HCHAR(SX-1,50-3,1 
15,2) 

20606 CALL HCHAR (SX,50-2, 115 
)- 

20650 GOTO 27200 

28760 CALL HCHAR(1,16,71) 
28750 CALL HCHAR(1,17,79 
20800 CALL HCHAR(1,18,79) 
20856 CALL HCHAR(1,19,68) 
2096@ CALL HCHAR(1,21,33) 
20950 CALL HCHAR(2,12,84) 
21060 CALL HCHAR (2, 13,72) 
21056 CALL HCHAR(2,14,65) 
21100 CALL HCHAR (2,15,84) 
21156 CALL HCHAR(2,16,39) 
21200 CALL HCHAR(2,17,83) 
2125@ CALL HCHAR(2,19,82) 
21366 CALL HCHAR (2,20,73) 
21350 CALL HCHAR(2,21,71) 
21400 CALL HCHAR (2,22,72) 
21456 CALL HCHAR(2,23,84) 
21500 CALL HCHAR(2,25,33) 
21550 CALL HCHAR(4,6,32,10) 
21606 CALL HCHAR(5,14,156) 
21659 CALL HCHAR (5, 15,32) 
21768 CALL HCHAR (6,5, 145) 
21756 CALL HCHAR (6,6,40,9) 
21800 CALL HCHAR (6,15, 136) 
21850 CALL HCHAR (5,6,40,2) 
219060 PO=7 

21956 FOR I=1 TO 4 

22000 IF C(I)<>2 THEN 22156 
22056 CALL HCHAR(5,PO,112) 
22106 GDTO 22806 

22150 IF C(I)<>12 THEN 22300 
22266 CALL HCHAR (5, PO, 96) 
22259 G0TO 22806 


22300 IF C(I)<)9 THEN 22450 
2235@ CALL HCHAR(5,PO, 104) 
22400 GDTD 22800 

22456 IF CiI)<>16 THEN 22606 
2250® CALL HCHAR (5, P0,91) 
22550 GOTO 22806 

22600 IF C(I)<>13 THEN 22750 
2265© CALL HCHAR (5, F0, 120) 
22700 GOTO 22800 

22750 CALL HCHAR(S5,PO, 128) 
22860 PO=PO+2 

22856 NEXT I 

22900 FOR I=1 TO 400 

2295@ NEXT I 

23006 CALL HCHAR(1,1,32,32) 
2305@ CALL HCHAR(2,1,32,32) 
23100 IF A=1 THEN 24756 
23150 A=2 

23200 FOR I=1 TO 4 

23250 CALL HCHAR(23,4+1,ASC 
SES$(PL1$,1,4))) 

23360 CALL HCHAR (23, 15+1,ASC 
(SEG$ (PL26,1,4))) 

23350 NEXT I 

23400 IF L$<>PLi$ THEN 23500 
23450 D=D+18-M#2 

23500 FOR I=1 TO LEN(STRS(D) 
) 

23556 CALL HCHAR(24,2+1,ASC( 
SEB$(STRS(D) ,I,LEN(STR$(D))) 
» 

23660 NEXT I 

23650 IF L$CDPL2$ THEN 23750 
23790 E=E+18-M#2 

23750 FOR I=1 TO LEN(STRS(E) 


) 

23800 CALL HCHAR (24, 13+1,ASC 
(SEG$ (STR$ (E) , I, LEN(STR$ (EI) 
»» 

23850 NEXT I 

2390G CALL HCHAR (24,9.80) 
2395@ CALL HCHAR (24, 10,84) 
24000 CALL HCHAR (24, 11,85) 
24950 CALL HCHAR (24,20,86) 
24100 CALL HCHAR (24,21,84) 
24150 CALL HCHAR(24,22,85) 
24200 F=F-1 

24250 IF F=60 THEN 24756 
24300 IF H$<>PL1$ THEN 24550 
24350 H$=PL2$ 

24460 L$=PL1$ 

24450 A=2 

24500 GOTO 10456 

24556 H$=PLI$ 

24600 L$=PL2$ 

24650 A=2 

24700 GDTO 18456 

24750 CALL HCHAR(1.3,68) 
24860 CALL HCHAR (1,4,79 
24850 CALL HCHAR(1,6,61) 
24908 CALL HCHAR(1,7,79) 
24950 CALL HCHAR(1,8,85) 
25060 CALL HCHAR(1,16,87) 
25050 CALL HCHAR(1,11,65) 
25100 CALL HCHAR(1,12,78) 
25156 CALL HCHAR(1,13,84) 
25206 CALL HCHAR (1,15,84) 
25259 CALL HCHAR(1,16,79) 
25360 CALL HCHAR (1,18,80) 
25350 CALL HCHAR(1,19,76) 
25400 CALL HCHAR (1,20,65) 
25456 CALL HCHAR(1,21,61) 
2550® CALL HCHAR (2,3,83) 
25550 CALL HCHAR(2,4,85) 
2560@ CALL HCHAR (2,5,80) 
25650 CALL HCHAR (2,6,69) 
2570@ CALL HCHAR(2,7,82) 
25756 CALL HCHAR(2,8,67) 
25806 CALL HCHAR (2,9,79) 
25850 CALL HCHAR (2,10,68) 
25900 CALL HCHAR(2,11,69) 
25950 CALL HCHAR(2,13,65) 
26000 CALL HCHAR(2,14,71) 
26056 CALL HCHAR (2, 15,65) 
26180 CALL HCHAR (2, 16,75) 
26156 CALL HCHAR(2,17,78) 
26200 CALL HCHAR (2,18,59) 


26250 CALL HCHAR (2,19,61) 
2630@ CALL HCHAR (2,20,62) 
26350 CALL HCHAR{2,21,78) 
26400 CALL HCHAR (2,22, 60) 
26456 CALL HCHAR(2,24,63) 
26500 CALL KEY(@,K,S) 

26556 IF S=® THEN 26506 
26600 IF K=89 THEN 26650 ELS 


E 26856 


26656 
26706 
26750 
26806 
26856 


CALL HCHAR(2,26,61) 
FOR I=1 TO 106 
NEXT I 

GOTD 1706 

IF K=78 THEN 26900 ELS 


E 26506 


26900 
26950 
27000 
27050 
27106 
27156 
27206 
27256 
27306 
27350 
27496 
27450 


CALL HCHAR (2,26, K) 

FOR I=1 TO 106 

NEXT I 

CALL HEHAR(1,1,32,30) 
CALL HCHAR(2,1,32,30) 
IF K<>74 THEN 29956 
IF W>@ THEN 27306 
GOTO 27906 

IF W>1 THEN. 27450 
CALL HCHAR (5X,50-1,92) 
G0T0 27908 

IF W>2 THEN 27608 
CALL HCHAR (SX,50-2,92, 


G60T0 27900 
IF W>3 THEN 27806 
CALL HCHAR(SX-1,50-2,9 


CALL HCHAR(SX,S0-2,92, 


ö GOTO 27908 


2) 

27998 
27956 
28660 
28056 
28106 
28156 
28260 
28250 
28306 
28350 
28906 
28456 
28560 
28550 
28546 
28656 
28706 
28750 
288066 
28956 
289060 
28956 
29000 
29056 
29106 
29150 
29206 
29250 
29300 
29350 
29400 
29456 
29506 
29550 
29606 
29650 
29796 
29756 
29800 
29856 
29908 
29950 
30066 


CALL HCHAR (8X-1,50-3,9 
CALL HCHAR (SX,50-2, 92, 


IF M<>8 THEN 29606 
CALL HCHAR(1,3,84) 
CALL HCHAR(1,4,72) 
CALL HCHAR (1,5,69) 
CALL HCHAR(1,7,82) 
CALL HCHAR (1,8,75) 
CALL HCHAR(1,9,71) 
CALL HCHAR(1,10,72) 
CALL HCHAR(1,11,84) 
CALL HCHAR(1,13,679 
CALL HCHAR(1,14,79) 
CALL HCHAR (1,15,77) 
CALL HCHAR(1,16,66) 
CALL HCHAR (1,17,73) 
CALL HCHAR(1,18,78) 
CALL HCHAR(1,19,65) 
CALL HCHAR (1,20,84) 
CALL HCHAR (1,21,73) 
CALL HCHAR(1,22,79) 
CALL HCHAR (1,23, 78) 
CALL HCHAR (1,25,87) 
CALL HCHAR (1,26, 79) 
CALL HCHAR (1,27,85) 
CALL HCHAR (1,28,76) 
CALL HCHAR(1,29,68) 
CALL HCHAR (2,3,72) 
CALL HCHAR(2,4,65) 
CALL HCHAR (2,5,8B6) 
CALL HCHAR (2,6,69) 
CALL HCHAR (2,8,66) 
CALL HCHAR (2,9,69,2) 
CALL HCHAR (2, 11,78) 
CALL HCHAR (2, 13,58) 
G60T0 21550 

SX=5X-2 

SO=SD-2 

FOR I=1 TO 4 

LET CL(DI=CED) 

LET SItD=ST(I) 
NEXT I 

GOTO 11956 

CALL CLEAR 

END 
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für den TI-99/4A 


Das Programm hat einen Speicherum- 
fangvon ca.9 K. Nach der Eingabe von 
"RUN" wird man von einem ein- 
drucksvollen Einleitungstitelbild über- 
rascht. von dem man aufgefordert 
wird. den Action-Knopf des Joy- 
sticks (1) zu betätigen. Dabei muß 
man sich aber entscheiden. welche 
Farbe das Labyrinth im späteren 
Spiel haben 'soll. Diese richtet ‘sich 
nämlich nach der augenblicklichen 
Farbe der Schrift im Titel. Nach 
dem Drücken wird man erinnert, 
die richtige Stellung der "Alpha-Lock”- 
Taste zu überprüfen. Im Anschluß 
daran kann man sich an einer kleinen 
Sound-Einlage erfreuen. diese aber 
auch überspringen. indem man vom 
Bildschirmaufbau an bis zum Ertönen 
eines akustischen Signals die Feuerta- 


se! 
\ 
2% ON TI 
io "8.9 K-BYTE 
AB U MAYAIUNE 1984 Bi 
56.3 _HENRIK BAUR 
56. SCHULSTRASSE 16 
78. % 7918 SENDEN 
88° TEL: 67307/5184 
IR 


100 ! 
} DONIIE, 


116. DIR CD) ,T(12) 
126 RANDONIZE 


130 ! 

B SCHIRNS 

140 CALL DELSPRITEGALLISS DAL CLEAR + CALL SUREENI2):> CAL 
NIFYLS) 

Ion ! VARIABLEN-BESETZUNG 


\ 
iu Ei=l3 3: CiDel4 2: C9=5 3: CiNelb 2: CAS 23 [Ib 
eu 


U DIMENSIONIERUNG & RAN- 


{ VORBEREITUNG DES BILD- 


ei 

cu9=18 2: Cill)=ll 

A222 3: TE3)=246 s: TiA=2b1 2: 11512293 
n 


TIN=449 33 13493 35 T1D=523 
277 


LVL=6 :: TMP=1.3 
! GRAFIK 





200 ! 
t (Aschl Kl 2-19) 


6 CALL mis, "QALL3ETBAFTOSEIC") 
Fi CALL. CHAR (92. "9081070F0303121F1D0917190n02000008EOFBFLFE 
SELEICFÜFBRAACHBAAG 


00") 
239 CALL CHARI9B, "O8B00B03BFALIBIBIBIBOLOFESOBGBRRABRBANCHFE 
SRIBIBIBLBSOFALOBORG 

9") 

240 CALL CHAR(180, "1B1B1818181818180000B0FFFFOBRAOROABOAAABE 
SunnnnnneeeasenBBER 

saß 

250 CALL CHARIIO4, "oOao01B1BOAOROGERGO LIEBER GERETE— 
DORDOABGBBADBEBBRDG 


090") 
260 CALL CHAR(108, "00000061070FÖF IFILOEOFO70100008000GGA0RBE 
BIO3OFBOOHBBAEOBHBAE 
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Man 


ste gedrückt hält (Programmzeile 450). 
Ein neues Bild erscheint, wenn alle 
Punkte verspeist wurden. Das Spiel ist 
beendet. wenn alle Pac-Men verspeist 
wurden. 


Variablenliste: 

C(xx): Farben 

T(xx): Tonleiter 

PCM: Credit 

BLD: Bild 

SC: Score 

HSC: Highscore 

LVL: Level 

TMP: Geschwindigkeitsfaktor (Hier 
sollte nichts verändert werden!) 

S: in FOR-NEXT-Schleifen & Sprites 
FN, FNI, FN2: in FOR-NEXT- 
Schleifen 

P: Anzahl der gefressenen Punkte 


909") 
270 ALL CHAR(112, "00000001070F09191FODOEO7010900B00000AABAE 
ne een 

*) 


288 CALL CHAR(1 16, "09006001070C0C1F6000010701000000000000BAE 
en 


290 CALL CHAR(120, *60000163630797070706070FONIAOGOOABOGEAFRP 
BIBFBCBAO2OFBFORABRG 


308 CALL CHAR (124, "006003070F09890FGFORDOFODOBOAGARMGOLAEOF 
LE 10 


316 CALL CHARI128, "0000078F19191F 130004 1FOFOSODEAHAAGAOBACHT 
OEBEGEDEBSGEOFOSSBO 


900°) 
320 CALL CHARI132, "0000000001031 EOFOR 1EOFOSOHABEBGKAGOHAORL 
TEEN 


330 CALL CHAR (136, "000000006F0505974C 1 BOFONGOHAGOOnAHAOAAOF 
ne 


348 CALL CHAR(149, "0600000003 1E040F020.070n00000000090000008 
Heldin 


” N ! FARBE 


360 CALL COLORGL,6,1,2,6,4,3,11,1,4,11,1,5,14,1,5,14,1,7,14, 
1,8,14,1,9,1,1, 19,15 


{78 SOTO 998 ! ZUM VORSPANN 
wi N SETZEN GANS-BEISTER 


398 5=8 :: FOR FN=30 TO 158 STEP 32 2: 5=5#1 2: CALL SPRITEL 
3SH,124,C15), FR, 

äh, 9,62: 'NEIT FR 
m: ! SETZEN ZWISCHENBEISTER 


A1® FOR FNzIA TO 174 STEP 32 33 S=Se1 ı5 CALL SPRITEIASHLIS 
61615) FN,ANDEZSSH, 

98): NEIT FR 

HH CALL PAISE1ZR0) 





! ZUM LABYRINTHAUFBAU & 


440 P=0 :: ON BLD GOSUB 786,800,826,849, 868 
ul KEY(A,K,SDs3 IF K=18 THEN 520 "LIED WIRD VEBER-SPRU 


460! ! SONG 


K, S: Verwendung in "CALL KEY(...)” 

RI, R2: Verwendung in "READ” 

PT: Verwendungin "CALL PATTERN 

(I 

Z: Verwendung in "CALL 

GCHAK:...)” 

X, Y: Koordination im "24*32-Raster” 

X1, Yl: Koordination im "192*256- 

Raster” 

X2, Y2: mit "CALL JOYST(...)” 

Er: Anzahl der Punkte im jeweiligen 
i 

HG: Höchstgeschwindigkeit der Gei- 

ster im j. Bild 

Pl, P2: Variablen im Upro "CALL 

PAUSE(.)” 


Strings: 
A$: Labyrinthspeicher 
B$: Blinkmechanismus im Vorspann 


NR 
ATO FOR FNI=1 TO 2 3: RESTORE 1398 +: FOR FRZ=I 10 25 

309 BED RL,R2 2 ALL SOUNDRLEIR, TORI, NET ANZ 55 
490 RESTORE 1420 5: FOR FNlz1 T0 52 

500 RERD RL,R2 s: CALL SOUND(RIELBB, TIRZ)„O):: NEIT FM 
518! U SETZEN PAC-MAN-SPRITE 


520 CALL SPRITEIS,112,11,1,125,0,0):5 CALL PAUSEIS®) 


530 GOSUB 1466 

540! N SPIELSCHLEIFE : 

! RAUF-RUNTER 
\ 


558 PTz112 


560 GOSUB 686 

570 IF 103105 AND 142107 THEN 590 

588 IF 12028 AND Y2=0 THEN CALL SPRITEIB.PT.LL,XEB-10,YaB-1 
Mi XZETNP)2: GOTO 6 


l 

5” au NOTIONIA.-Y2ETNP, O2: iin en 
600! ELSCHLEIFE : 
! RECHTS-) LINKS 


10 IF ie 4 THEN PT=188 

620 IF X2=-4 TEN PT=116& 

630 GOSUB 590 

640 IF 10105 AND 163197 THEN 60 

650 IF Y2C>8 AND X2=0 THEN CALL SPRITE(HI,PT,IL,XEB-10, Yaß-I 
Alle „Ds: 6070 


568 CALL NOTIONIAL,B,AZEINP):: sur 619 
670! ! UPRO ZU DEN BEIDEN 
y SPIELSCHLEIFEN 


680 CALL Basırimi ADD Es CALL JOYSTEL.XZ,YZDE> CALL PAT 
TERNASL,PT) 

690 CALL COINCALL,CO)S: IF CO=-1 THEN 1206 

798 X=INTHNLHIN/ BE: YEINTEONIHLN ZB 

118 IF XC1 OR X324 THEN 760 

726 IF Y<A_OR W932 THEN 766 

730 CALL SCHAR(X,Y,Z) 

7AO.IF 1C106 AND 23103 THEN CALL HCHAREX,Y,Z#DD4: P=PHl ; 
IR NNTRE) 

756 IF P)=PB THEN 340 

768 CALL COINCIALL„CD): IF CO=-1 THEN 1208 ELSE RETURN 
Ha ! BILDSCHIRKAUFBAU 


788 As=" hhhhhhhhhhhhhihhhhhhhhhhhhh "eeeeeeeseeebh 'ereeesee 
eeeb d dhd 
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d aeeepeepeeechaeereeeeeerec” 
798 PB=153 :: H6=8 :: 6OTO 880 
a “eegebh "eeeebh‘ereebh'e 
d apeeechapeeechaeeeechapeeec" 
818 PB=189 :: H6=11 :: BOTO 880 
820 A$=" hhihhhhihhhhhihhhhhihhhhihh "bh"eebh'eeehh"eeebh'ee 
bh'b Adhd dhd dhd 
dhd dhdd achaeechaeeechaeeechaeechac” 
830 PB=225 :: HG=13 :: 6DTO 886 
840 As=" hhähhhihhhihhihhihhhihhhihh 'bh"ebh"ebh'bh'bh"ebh'e 
bh'b ddhd dhd dhadhd 
dhd dhd dhdd achaechaechachachaechaechac" 
850 PB=261 :: Hb=13 :: G0TO 880 
860 A6=" hihhihhihhihhihhihhihhihhih bh'bh'bh'bh"'bh"bh'bh'bh 
*bh" dhddhddhddhddhd 
dhddhadhddhd chachachachachachachachacha" 
870 PB=297 :: H6=17 :: PCN=PLN+I 
88 CALL DELSPRITEISN):S FOR FN=1 TO 6 :: PRINT Abis: NEXT F 
N :: LVLSLVLEL 23 60 
SUB 1346 


896 IF BLD)=5 THEN BLD=1 ELSE BLD=BLD+ 
900 FOR 5=2 TO 6 :: ON INT(RNDEZ)+I GOTO 910.920 
m m PATTERN 45,120): CALL-NOTION{BS, 0, K6-RNDEHG/S 


920 CALL PATTERNIAS, 128): CALL NOTIONI8S,, -HE+RNDEHG/S):: 
soro 936 


930 NEIT 5 
946 FÜR 5=7 10 12 :: ON INTIRNDEZI+L GOTO 950,960 
95 CALL PATTERNIBS,140):: CALL MOTIONIBS,8,LVLE2):: GOTO 97 


% 
u CALL PATTERN(BS, 132): CALL MOTION(ES,0,LVLE-2):: 6070 9 


978 NEIT S 23 RETURN 
99! "VORSPANN 
H 

390 BSLL)="BORRRAIBIB" 

1000 B612) „BS{b)="OROBLBSCSCIB" 

1818 BSIS) BSIS)="BOLBSCTETESCIB" 
1020 BS(A)="IBTETEFFFFIETEIB" 

1038 PRINT "FRE RE HE RER f 
De ze ae 


La EEE 21) )1 


Lan 1 Du 1 1 0 Bun 1 1 5 50 1 
1040 PRINT " # FARtE 
NE 

ER Dee 
1050 PRINT :: PRINT ""eeeeeerpereeprepeeerepzeeeh” 

1069 FOR 1=1 TO 18 :: PRINT "d 

NEXT I 2: PRINT *a 

eeeepBeeepppppeeppeepeeeeec" :: PRINT 

1076 DISPLAY ATLLASISIZE(20) "PRESS FIRE TO BEGIN!* 
1080 DISPLAY AT2O, SISTZE(2A)2 "COPYRIGHT 1984 ATAC % CO" 
1990 CALL SPRITEIRI, 108, 11,118, 154,0, 20,92, 140,6, 118,112,8,2 
0,33,128,14,118, HR) 


‚20 
1108 CALL SPRITEIBA, 116, 11,134, 102,0, -20,85, 132, 10,134, 142,0 
20, Ke 7 


1118 CALL SPRITE187,92, 16,38,99) 

1120 FOR FMI=I TO 11 23 CALL EDLORI9,CAFNI) 1) 

1138 FOR FN2=1 TO ALL CHAR(192,BSCFNZI) 

1148 CALL KEYLL IF K=18 THEN 1168 

1158 NEXT FN2 :: NEIT FM 2: 6070 1126 

1160 CALL TELSRITEILI: GOSUB 1468 2: FOR FNzI 107 33 PR 


INT :: NEXT Fi 
“ul PRINT * dALPHA LOCK? 


ER 


JO HHRREEE ER SRERE 


'ereeeeeeeeh 
aeee 


BREREEREC a 
1188 FOR FN=1 TO 12 3: 
119 N 


1288 CALL POSITION .KI,YEDSS CALL SPRITECAL.92, 16, X, 1,8, 


U 

1210 CALL SOUNDI250, 184,8,369,3,739,1):: CALL SDUNDI125,195 
S 391,3,783, 10) 

iz Si Bun 184,8,369,3,738,10):: CALL SOUNDI250, 146 
’ sl 

1236 cALLl omas, 138,8,277,3,554,10):: CALL SOUNDI1006,12 
3,8,246,3,493,10) 

Be PCN=PEN-] 2: IF PON:6 THEN 1260 ELSE 6OSUB 1348 3: G0TO 


120 N ! "SAME DVER® 
1268 HSCSNANISC.HSCIS: BOSUB 1340 


PRINT :: NEXT FN :: 6010 396 
U PAC-HAN TOT 


1270 DISPLAY AT(12, IISIIE I Un esetererestersen! 

1286 DISPLAY ATLIS.BISIZELLN:"G 

1298 DISPLAY ATLIA,GISITEUIA): Be ekaerz 

IM a FN=1 T0 28 :: DISPLAY ATUIS.MISIZEUNI:'GANE 0 


1316 CALL PAUSEITO)S: DISPLAY ATLIS.TISTZELITIE" 
1320 CALL PAUSEI70):: NEXT FN =: GDTO 100 
1336! ! AUSDRUCKE 


1348 DISPLAY AT(ISZISIZEIG)E" 5°5PCM 
1350 DISPLAY ATLI,IB)SIZE(B) RSC 
1360 DISPLAY ATIL ZASIZEISIS*L’SLVL 
1376 DISPLAY ATILBISIZEIB) SC 
1386 RETURN 

19 H 


Jim Dama AN 
y 


! LIED-DATEN 


ea Fi LEN 
Ile’ R la 9,2,8,2,5,2,3,2,1 

IM aa un 1,162, a 1,2,12,4,12,1,11,1,18,2,9,2,18,2 
I Ri, h I, ,4,7,1,6,1,7,2,8,2,4,2,8,4,5,2,5,2,8,2 
Bl 


{ÄRB DAR 2,9,1,11,1,161,9,1,8,,8,2,7,1,5,1,5,2,8,1,8,1,%, 
UML, 


ide DATA 3,10,1,11,2,9,4,8 
1a 68! ! UPRO TONLEITER 


1476 FOR FN=1 TO 12.:: CALL SOUNDI-58, TEFN) O5: NEXT FR 
1480 FOR FN=11 TO. STEP -1 2: CALL SDWDI-50, TIFN),O):: NEX 


T FR 3: RETURN 

1998 ! ! UPRO PAUSE 

\ 

ıim SUB PAUSE(PID:: FOR P2=0 TO Pi 5: NEXT P2 5: SUBEND 3: 


1516. ! BY HENRIK BAUR 
ı 


TERMIN-Kalender in CPU 


Name der Veranstaltung 


Kasseler Computertage ’84 
4. Commodore-Fachausstellung 
Elektronik-Comp.-Tage Saar 


12th ZX-Microfair ’84 


Fachtagung d. Ges. f. Informatik 


Photokina ’84 
Hobby-Elektronik ’84 


Computertage Hückelhoven 
Hobby + Elektronik ’84 
Bayerischer Computertag 
Hessischer Computertag 


Micro-Computer ’85 


Computer & Communication ’85 


20 CPU 


Datum 


30.08. 


nur 
08.10. - 
10.10 
17.10. - 
20.10. 
15.11. - 
nur 

nur 

29.01. 
15.05. 


- 02.09.84 
06.09. - 08.09.84 
07.09. - 09.09.84 
08.09.84 
10.10.84 
.. 16.10.84 
21.10.84 
- 21.10.84 
18.11.84 
02.12.84 
09.12.84 
- 03.02.85 
- 19.05.85 


Ort 


Kassel 
Frankfurt/M 
Saarbrücken 
London 
Berlin 

Köln 
Stuttgart 
Hückelhoven 
Wien 
München 
Neu-Isenburg 
Frankfurt/M 
Sindelfingen 





September 1984 











T1-99/4A 





Kalenderprogramm 


für den TI-99/4A 


Nach dem Start des Programmes erscheint das Titelbild auf dem 
Bildschirm. Geben Sie in numerischer Form Tag, Monat und Jahr 
des heutigen Datums ein. Nach der Eingabe die ENTER-Taste 


drücken. 


Auf dem Bildschirm erscheint nun das 
Menue. Wählen Sie eines der 4 
Teilprogramme: 

1. Monatskalender 

2. Feiertage in Bayern 

3. Wochentag 

4. Distanz 

Drücken Sie die entsprechende Taste 
und danach die ENTER-Taste. 


Erklärung der 4 Teilprogramme: 
Teilprogramm 1: 

Monatskalender 

Geben Sie den gewünschten Monatein 
(Monatsname .ausschreiben z.B.  Ja- 
nuar) und drücken Sie danach die 
ENTER-Taste. Geben Sie nun das ge- 


Der Rechner schreibt nun das Kalen- 
derblatt aus. Die Sonn- und Feiertage 
werden mit roten Ziffern geschrieben. 
Danach werden die in diesem Monat 
vorkommenden Feiertage aufgelistet. 
Mit dem Drücken der Taste 9 wird in 
das Menue zurückgesprungen. Mit 
dem Drücken der Taste 8 wird das Teil- 
programm wiederholt. Auch in den an- 
deren Teilprogrammen sind diese Ta- 
stenfunktionen programmiert. 


Teilprogramm 2: 

Feiertage in Bayern 

Geben Sie das gewünschte Jahr ein (4- 
stellig z.B. 1983). Danach die ENTER- 
Taste drücken. Es werden die 18 


wünschte Jahr ein (4-stellig z.B. 1983). 


wichtigsten Feiertage (gültig für. 
Danach die ENTER-Taste drücken. 


Bayern) mit Datum und Wochentag 
aufgelistet. 

Teilprogramm 3: 

Wochentage 

Geben Sie das gewünschte Datum ein. 
Das Eingabeformat beachten (z.B. 
01.01.1983). Danach die ENTER-Taste 
drücken. Nun wird der Wochentag für 
das eingegebene Datum ausgeschrie- 
ben. 


KALENDERFROGRAMN 


RK 


PROGRAMMIERT VON: 
MICHAEL GARTNER 
STERNSTR.7 

8863 ODELZHAUSEN 


Teilprogramm 4: 
Distanz 
Geben Sie das erste Datum ein (Einga- 
beformat wie bei Teilprogramm 3). Da- 
nach die ENTER-Taste drücken. Ge- 
ben Sie das zweite Datum ein und 
drücken Sie die ENTER-Taste. Der 
: 5 Computer gibt nun die Differenz der 
6 CALL CLEAR :: CALL SCREEN(2) beiden Daten in Tagen aus. 
ö DIN F&(19).P$(7),0$(12),685(26) ,KS$ (26) 
o FOR : (@)sz NEXT FOR @=1 TO 7 :: READ F$(@:: NEXT @ 
FOR :: READ O$(@:: NEXT @ :: FOR @=1 TO 12 :: READ Ol@):: NEXT @ 
@ FOR READ G5$ (®):: CALL CHAR (6448,68$(@)):: NEXT @ 
® FOR 26 :: READ KS$i@) :: CALL CHAR(FEHR,KSSI@)r: NEXT @ 
FOR Ö :: READ 28% (@:: CALL CHAR(47+8,75$(@):: NEXT @ 
ö FOR @=48 TO 57 :2 CALL CHARPAT(E,CH):: CALL CHAR(B+80,C$):: NEXT @ 
© CALL CHARPAT(83,K1$) 2: CALL CHARPAT(I11,K2S) 2 CALL CHAR(138,K1$):: CALL CHA 
19, K2$) 
356 CALL CHAR (46, "60006A00600030" ) 2: 
BÖFF") 
CALL CHAR 


24.62.1983 


KK 
ze ae 


IRRE E 


\ 
\ 
ı 
\ 
\ 
' 
\ 
\ 
' 
\ 
' 
' 
' 
\ 
\ 


„25$(16),TA(18) ,MO(18),0112 


CALL CHAR (58, "0600003000063@") 23 CALL CHAR 


„'Sl0181815181HL8L")r= CALL CHAR (37, "B080808080808G89"):: CALL C 

HAR (38, "06060609 GGSFF") az CALL CHAR(39,"FF") 

376 CALL CLEAR CALL SCREEN(16):: FOR @=6 TO 12 :: CALL COLOR(B,15,5):: NEXT @ 
CALL COLOR(13,7,16,14,7,16)2: CALL RAHMEN 

388 CALL HCHAR (6,4, 26): CALL HCHAR(11,4,38, 

LL VCHAR(7,4,37,13 CALL VCHAR(7,29,36,13) 

396 DISPLAY AT(4,7):"KALENDERFROGRAMM" 3: DISFLAY AT(8,6)SIZE (18): "Anwendungsber 

eich" »: DISPLAY AT(18,&)SIZE(18):"von 1593 bis 2206" 

466 DISPLAY AT(13,MSIZEi1S):"Heutiges Datum: ” 

416 DISPLAY AT(15,9)SIZE (14): "Eingabeformat:" 33 DISFLAY AT(16,PSIZE(1DI:" (81.0 


gay m 
1.1982) 


26) 2: CALL HCHAR (26,4,39,26)2: CA 
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428 ACCEFT AT(18,16) VALIDATE<DIGIT,".")SIZEIIO)BEEF:V$ :: IF V$="" THEN 426 :: I 
F LEN(V$)<16 THEN 426 2: T=VAL(SEG$ (VE, 1,2): M=VAL(SEGS (V$,4,2))2: JZ=VAL (SEG$ 
W6,7,3)) 
430 ON ERROR 426 :: GOSUB 2118. :: IF Yo=l THEN 426 :: GOSUB 2066 =: HT=TX 
440 CALL CLEAR CALL. SCREEN (7 FOR @=6 TO 12 :: CALL COLOR(@,2,16):: NEXT @ 
»: CALL RAHMEN DISFL.AY AT 13,7): "KALENDERFROGRAMM" 
459 CAIL HCHAR(4,3,38,28):: CALL HCHAR(8,3,39,28):: CALL VCHAR(S,3,37,3):: CALL 
VCHAR (5,30, 36,3) 
456 DISFLAY AT(&,9)5SIZE (12): "Auswahlliste" 
478 DISFLAY AT(16,2):"(1) = Monatskalender" :: DISPLAY AT(12,2):"(2) = Feiertage 
im Jahr" 
486 DISFLAY AT(14,2):"(5) = Wochentage” :: DISPLAY ATi16,2):"14) = Distanz" :: D 
ISFLAY AT(18,2)9:"i5) = Frogramm beenden" 
398 DISFLAY ATL :"Teilprogramms" =: ACCEFT AT(22, 15) VALIDATE"12345")SIZE(1) 
BEEP:EI$ :: IF EI$="" THEN 49% S 
506 EI=VALIEI$):: ON EI GOTO 516, 996,1170, 1330, 1570 
51% CALL CLEAR :: DISPLAY AT(2,7) 2: "MONATSKALENDER" 
526 DISPLAY AT(4,1)2 "Monat: "3 TAB(18)5"Jahrs" z: CALL HCHAR(5,2,66,29) 
536 ACCEPT AT(4,8)VALIDATE (UALFHA)ISIZE(P)BEEF:MG 2: IF M&="" THEN 536 
540 FOR Mi=1 TO 12 
550 IF Q$(ND)=N$ THEN 596 
556 NEXT MI 
578 GOTD 53% 
586 ACCEPT AT(4,24) VALIDATE(DIGITISIZE(A)BEEP:JZ$ :: IF JZ$="" THEN 586 ELSE JZ= 
VAL (JZ$) 
596 IF 922266 OR J2741583 THEN 586 
666 DISPLAY AT (7,4) :CHR$ (13B)SCHR$(139)&" Mo Di Mi Do Fr Sa" 
610 CALL HCHAR (8,5,66,22) \ 
626 DISPLAY AT(17,1):"Feiertage und kirchl.Feste" :: N=l 
636 CALL HCHAR (18,2,60,29) 
646 GOSUB 1586 :: M=lil :: T=1 :: GOSUR 26066 
658 R=TX-INTLTX/TIR7 38 IF JZ/4=INT(JZ/4)AND JZ/18GX >INT (IZ/1RO)OR JZ/A86=INT (JZ 
30%) THEN 012) =29 
66a Vi=Q(M)a: X=l.:: L=iö 
a FOR R: TO 6 :: GOSUR 846 :: X=X+1 
FOR L=11 TO 16 :: FOR R=b TD 6: 
X=X+1 22, NEXTAR 3 NEXT L 
@ FOR I=1 TO 18 
d MA$S=STRE(MOCT))z: TAS=STRS(TACDI) 
IF LEN(MA$)=2 THEN 746 
oa MAS="O"&MAS 
IF LEN(TA$)=2 THEN 766 
TA$="O"&TA$ 
IF MO(I)=M THEN DISPLAY ATILS+N,LIEF$CIISTAR(24) 5 TA$E"."5MAS$ 3: N=N+l 
ö NEXT I 
ö FOR I=1 TO 18 
IF MO(D)=t THEN 826 
NEXT I 
a DISFLAY AT(28,4)2"im ";5M$5JZ :: DISFLAY AT(22,4):"sind keine Feiertage" 
& CALL KEY(&,L1,L2):: IF L2=0 THEN 826 
IF Li=56 THEN 518 ELSE IF L1=57 THEN 440 ELSE 826 
%$=5TRE (X) 23 LX=LEN(K$) 
IF LX=2 THEN 876 
xXs=" "RX 
IF R=6 THEN 936 
FOR I=1 TO 18 
IF MO{I)=M AND TA(I)=X THEN 936 
ö NEXT I 
DISFLAY ATiL, (R&D) +4) :%X$ 
GOTO 986 e 
A=ASC(SEG$ (X$,1,1))z: B=ASC(SEG$(X$,2,1)) 
IF A=32 THEN 966 z 
A=AtB0 
5» B=B+86 
& DISPLAY AT(L, (R*3) +4) 2: CHR$ (A) SCHR$ (BR) 
ü RETURN 
CALL CLEAR :: DISPLAY, AT(2,6):"FEIERTAGE IM JAHR" 
1866 DISFLAY AT(4,1): "Feiertage fuer das Jahr" 
161% CALL HCHAR« ‚60,50) : 
1826 ACCEPT AT(4,25) VALIDATE(DIGITISIZE(A)BEEF:JZ$ :: IF JZ$="" THEN 1626 ELSE J 
. AL{JEEI 
555 IF J 206 OR 1583 THEN 1628 
1546 GOSUR 1586 
1656 FOR I=1 TO 18 
19656 MDOE=STRE (MOD): TAS=STRE(TAUI 
1970 IF LEN{MO$)=2 THEN 1696 














s: NEXT R 
GOSUR 846 :: IF X=Vi THEN 766 
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MOS="O"LM0% 
IF LEN(TA$)=2 THEN 1118 
TAS="O"RTA$ 
T=TAlD:: DT) 
& GOSUB 2668 :: AS=TX-INT(TX/7)#7 
DISPLAY ATISHILLIEFSCH STARC21) ETASE"."3MOS5" "3SEGSIFS CASH), 1,2) 
a NEXT I 
CALL KEY(6,L1,L2)>: IF L2=6 THEN 1156 
IF Li=56 THEN 996 ELSE IF L1=57 THEN 446 ELSE 1156 
CALL CLEAR 2% CALL RAHMEN :: DISPLAY ATi5,9) 2 "WOCHENTAGE" 
DISPLAY AT(9,7): "Eingabeformat:" :: DISPLAY AT(18,8)2"(81.01.1982)" :: DISP 
LAY AT(13,6):"Datu x 
ACCEFT AT(1S, VALIDATE(DIGIT,".")SIZE(10) BEEF:V$ 
IF v$="" THEN 1190 
& TA$=SEG$ (VE, 1, MOS=SEG$ (V$,4,2) 2: J$=SEG$IV$,7,4) ° 
» ON ERROR 1196 :: VALKTASI SS M=VAL(MDS) 3: JZ=VAL(J$) 
GOSUR Z11% IF Yö=1 THEN 1196 
OR J2%1583 THEN 1198 
AS=TX-INT(TX/7)*7 
>=HT THEN HT$="ist" ELSE HT$="war" 
DISFLAY AT(9,60):" "ss DISPLAY AT(10,89:" Dar 
DISFLAY AT(1Z,6) 2" S 
1286 CALL HCHAR(9,4,38,26)2: CALL HCHAR(18,4,39,26):: CALL VCHAR{18,4,37,89:: CA 
LL VCHAR(16,29,26,8) 
1296 DISPLAY AT(12,4)SIZE(22)2"Der "3V$5" "5HT$S" ein" 
366 DISFLAY AT(15,10)SIZE (16) :P$(AS+1) 
a CALL KEYiO,L1,L2):: IF L2=0 THEN 1318 
a IF Li=56 THEN 1176 ELSE IF L1=$7 THEN 446 ELSE 1316 
© CALL CLEAR :: CALL RAHMEN :: DISPLAY AT(S,16) 2 "DISTANZ" 
DISPLAY AT(9,7): "Eingabeformat:" :: DISPLAY AT(16,8) 2" (61.61.1982) " 
& DISFLAY ATt 4):"Erstes Datum:" :: ACCEFT AT(13,18) VALIDATE (DIGIT,".")SIZE 
vis=V$ 


IF THEN 1356 
TA$S=SEG$ (V$,1,2)3: MOS=SEGS (V$,4,2):: I$=SEG$ (V$,7,4) 
© ON ERROR 1356 2: T=VAL(TA$)S: M=VAL(MDS) 3 JZ=VAL (J$) 


TXIa]% 
DISFLAY AT(15,9:"Zweites Datum:" :: ACCEFT AT(15, 18) VALIDATE(DIGIT,".")SIZ 
Et16) BEEP+V$ { 
1430 IF V&="" THEN 1420 
1440 TA$=SEG$ (V$, 1,2):: MO$=SEBS(V$,4,2)2: I$=SEGELVS,7,4) 
1450 ON ERROR 1420 :: T=VAL(TAB)E: M=VAL(MOS) 2 JZ=VAL (J%) 
1466 GOSUR 2116 :: IF Yo=1 THEN 1426 
1470 IF 92: 3 THEN 1420 
1480 GOSUR 2066 X 
1496 DISPLAY AT ı "33 DISPLAY AT(10,8:" 
ISPLAY AT(13 WW 
1516 CALL HCHAR (9,3 
LL VCHAR (16,30, 36,9) 
© DISPLAY AT(I2,PMSIZEILA)E"vom ";VI$ :: DISPLAY AT(14,S)SIZE(1W:"bis zum "5 


IF TX2-TX1=1 THEN DISFLAY AT(16,DSIZE(1M:" ist es 1 Tag" 
THEN DISPLAY AT(16,9SIZE(19):"sind es"5TX2-TX13 "Tage" 
1556 CALL KEY(B,L1,L2 IF L2=6 THEN 1556 
1566 IF L1=56 THEN 1336 ELSE IF L1=57 THEN 446 ELSE: 1550 
1578 CALL CLEAR 
1596 MM=22 2: 
»=1706 THEN MM=MM+1 
1956 THEN MM=MM+L 
2266 THEN MM=MmM+L 
THEN NN=NN+1 


4 AND JZ5=2166 THEN NN=NN-+H 
5 THEN NN=& 
UZSINTEIZZITI KRITERIUM) -INTECRIZ-INTÄGZZLTI KIT RIM 7 3) #30 
B*6+ (JZ-INT(JZ/7) #7) #4+JZ-INT (JZ/4) #4) &Z2+HNN 
& WO=TC-INT(TC/7)*7 2: TX=TE+WD 
1706 1 3 THEN TX=28 Y 
1718 34 AND TB=28 AND(JZ-INT(JZ/19)*19) >10 THEN TX=27 
1720 
1730 1 1 THEN M=M+1 32 TX=TX-31 
17468 TA(4)=TX :: MO4)=h 
1750 TAt TACH-2.:: MOCD=MOI4) 
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IF TAIZIS1 THEN MOIH=MOID-1 :: TAD=TAHI HEIL 
TAI) =STA(HI HI 2: MOLSI=MO (4) 
IF TA(SI=32 THEN MO (S=MO(D+l 2: TAD=STAHSI-E1 
9 TALTI=TA(4)+9 :: MO(T)=5 
IF MO(4)=3 THEN MO(7)=4 3 
IF TAAMD>Z1 THEN MDEMD=MOCTIHL 23 TAUDI=STAITI-3I 
TALBI=TA(4) +19 2: MOLB)=S 
IF MO(4)=3 THEN NO(8)=4 
IF TA(8)>31 THEN MO(B)=MO (SB) +1 TA(B)=TA(B)-31 
a TAXP)=TAIA)+ZO 2: MOIN=5 
THEN MO (9)=4 
31 THEN MO(PM=MOLNM+l 2: TALM=TAI-31 
TA(19)=TA(4)+36 :: MD(1O)=F 
IF MOi4) THEN MO (19)=4 
IF TAt18) >21 THEN MO(IS)=MO(IB)+I 3: TALOI=TALS)-SI 
&@ T=1 :: M=1l :: GOSUB 20666 
o WO=TX-INTITX/7)*7 32 TAUL4)=B-WO 
IF WO:4 THEN TAt14)=TAt14)-7 
TAt1A)=TAlıa) +14 MOtIA)=11 
oO TALISI=TA(14)+3 motıS)=ll 
TAt18)=TA(14)+7 23 MOCLS)=11 
TAI ,TALS),TAUD ,MOLDD,MO(DI=1 2: TAIZ),MO(1ID=S6 :: MOCIT),MOLLS)=12 
a MD(6)=5 :: TAALD=15S 2: MODS 2: MODEL 3: TAlld)=17 2: TAAD=25 : 
TA(18)=26 
1996 RETURN 
2666 
2018 
20. NT(JZ/106) THEN 2646 
IF JZ/A06« >INT (JZ/466) THEN 2650 
z=1 
2656 V=INT ( (366%*M-324) /10) 
2060 GDTO 2686 
2076 V=(M-1)x*31 
2086 Z=7+1JZ-1)*365+INT ((JZ-1)/4) 
20968 Z=2-INTt(JZ-1)/166) +INTIXJZ-1) /406) 
2100 Z+V+T 2: RETURN 
2110 : T>31 OR T£i OR M>12 OR Mi1 THEN. Yo=l 
2120 IF N DR M=9 OR M=11) THEN Ya=ı 
2136 IF T: 2 THEN Yö=l 
2146 AND INT(JZ/4)<5J2/4 THEN Yo=l 
2156 IF T=2 2 AND JZ/1G6=INT (JZ/166) THEN Yo=1 
2166 IF T=29 AND M=2 AND INT (JZ/466)=J7/466 THEN Yö=6 
2176 RETURN 
2186 DATA Neujahr,Hl.Drei Koenige,Karfreitag,Ostersonntag,Ostermontag, Tag der Ar 
beit 
2196 DATA Christi Himmelfahrt, Ffingstsonntag,Ffingstmontag,Fronleichnam, T.d.Deut 
sch.Einheit,Maria Himmelfahrt 
2266 DATA Allerheiligen, Volkstrauertag,Buss- und Bettag, Totensonnt.ag, 1.Weihnacht 
stag,2.Weihnachtstag 
2216 DATA Sonntag,Montag,Dienstag,Mittwoch,Donnerstaqg,Freitag,Samstag 
222% DATA JANUAR, FEBRUAR, MAERZ ,AFRIL, MAT, JUNI, JULI, AUGUST, SEFTEMBER, OKTOBER, NOVE 
MBER, DEZEMBER 
28,31,30,31,36,3 
84444704444 ,66794478444478,& 4446464438, 06782424242478, 0670467846 
467C,567C460794640640 
2256 DATA 6384446504438, 0444470444444, 867C1010101970,007C0404644438, 0048506656 
4844. 0640464046967C i 
226% DATA 66446054444444, 00446454904444,, 00384444444438, 0784444784640, 0039444454 
4038, 66784444734844, 0039463864443 
© DATA 387C1%16161010,66444444444439, 06424242422418,00424242425A24, 0642241818 
2, 064122146 Gu7EB4H810207E 
86 DATA 66 
4030, 6010257826 
96 DATA 604% 3100936101058, 600800 1808682816, 00202428302924 , 002020260 
262010, 40066854545454, 566067944444444 
DATA a6: 4444445: 0794444794646, 4444309404, 00002036 420, 006038 
30478,00207820202018, 00064444444459,00004444442810 
‚16 DATA 05604444545428,00004428102844, 0060444440340438, 00007C0810207C 
5 DATA 66384054546438, 0608189080B0A1C, 063844047840 7C, 06384418644458, 0068192848 


5 DATA 867C4678644438,00384679444438, 007C04681020620, 00394438444438, 003944443C 


5 SUE RAHMEN 
a GälL HEHARGL,E 3)22 CALL HCHAR(24,2, 50)2: CALL VCHARI2,2,37,22 
LL VCHAREZ 3 
"56 SUBEND 
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‚LET. 


y= a 


+i2 AND END: 
+12 AND RND 
LET srich 


co 
2,19; "5h 


48 budr 8,138: DRAU 255,0: 
NT AT 4, 1; "odaoaoo" ;AT 4,9," 
vBaa"; AT 4,21;5;AT 4,15- LE 
hiscore;hiscore;AT 4,20 

45 BRIGHT 1: INK 5“ PLOT Q,5 
DRAW 25,25: DRAW 39,-30: DRAN 18 
‚18: DRAU 5,-5: DRAW 208,28: _DRAL 
25.-25: DRAU 26,26. DRAW 17,-17 

DRAU 5,5: DRAW 18,-18: DRAU 13 

Si DRAU 15,-15: DRAW 20,530: DR 


“ 5: FOR i=1 TO I 
FND#+24645,RND#61+50: NEX 
TORE 2298: FÜR i=USR a 
-1: READ a: POKE i, 
PRINT AT io, 
:_ PAUSE 8: PRINT AT 
READY TS PRINT AT: Yu1Sjasiärıch 


"so LET 4a=INT_ (RND#21+1! 

85 LET x=8: LET x=31s11 AND dx 
a=-1l) 

?@ PRINT AT_ya,x; INK 5 
F INKEYS$<>"" THEN 60 5UB_ 108 

73 IF RND>t THEN GO SUB 250 

75 IF Ix=15 OR x=18J AND yY=ya 
THEN 50 _ TO 388 

88 PRINT AT ya,x; "ÄV:'LET 43 
a+dya: IF y3>18 THEN LET ya ı 
LET dya=-1 

Be ya<5 THEN LET yas=5: 


=X+dxa 

31 OR x<® THEN LET ya= 
i k l+i2 AN 

ET; dya=s-1+(2 AND FRND 


INKEY$="m" THEH 
y,15;a$isricht!: 
y<17): PRINT AT 
tı: RETURN 
F Tnkevsconee THEN { 


® 
nderseem? 


..m 


THEN IF y=my AND 
SUB 150 
INK 
BETURN 
® IF INKEYS<>"x" THEN RETURN 
142 BEEF „al,50: BEEP „01,55 
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RINT AT y,1S;asisr 

eRTaın PRINT AT y 

PLOT _ 139, (21-u1* 
FLOT 139, (21-3) #8 


‚® 
IF ya=y AND x515 THEN 
;_RETURN 
IF uf=1l THEN IF my=4 AND 
THEN 50 SUB 158 


PRINT _INK i+l 
‚81,50: BEEP 
".@1,53: NEXT i: IN 


ı7a QUER 2: 
PRINT AT 4,1; 
AT 4,3-LEN STR& score,sco 
R 1: PRINT AT ny,mx; "2": 
RETURN 


LET Aus 


PRINT _INK 
Rn P'.@1,-20: 
BEEP ee NEXT 


281 PRINT AT ya,x;"@" 
303 IF nr=@ THEN LET 
LET nx=x! 


mf=l: LET 
PRINT AT ny.mx; 


203 LET ya=INT (RND#21+1): LET 
i+i2 AND RND+.SI: LET dya=- 
AND AND? ,S); LET x=i51 AND 
1) 


IRH 


87? PRINT AT 4, inaonznzur 
PRINT _AT 4,8- -LEN STR$ 
re: LET aliensalien-il: 
ien THEN 50 SUB 400 


Lo 
gas AND J 
DEN RETURN 


"PRINT AT ya, 
Sen 0: 
Se 


5 Rokınr AT 4, 21is: LET s=3-1: 
Ir NOT s THEN &0 TO saa 

sı1@ PRINT AT 4,21;=: G0 TO 55 
+08 LET ztage=sstage+l 

+81 OVER 1: PRINT AT 2; 
a3 LET älien=INT iR 


41a RETURN 

S5oa DOVER 8: ‘IF 

EN PRINT AT 4,9; 

SELEN STRS$ score;s 
Tr 


582 LET Score=®d 
SsoS PRINT FLASH 1; 
1; "GAME QUER": 
sAIh Er SBAUSENG: 
" THEN 50 TO 5 

sıa STOP 
Sa2dBd DATA 
1: 


QUER &; 
PRINT _#9; "TRY 
In InKEvaeen 





für den 


ZX-Spectrum 


Bei diesem Spiel han- 
delt es sich um eine ver- 
änderte Version des be- 
kannten Defenderspie- 
les für den ZX-Spec- 
trum 16K. 
Ziel des Spieles ist es, so 
viel Punkte wie möglich 
zu erreichen, und zwar 
daß die Erde den 
feindlichen Aliens nicht 
zum Opfer fällt. 
Das Spiel ist erst dann 
beendet, wenn man drei- 
mal abgeschossen wurde. 
Gesteuert wird das 
Raumschiff mit den Ta- 
sten K und M (Bewe- 
gung nach oben und un- 
ten). Mit den Tasten Z 
und X wird nach rechts 
oder links geschossen. 
Durch Abschießen eines 
Aliens werden Punkte 
erzielt. 500 Bonus- 
punkte werden verteilt, 
wenn der Mutant, der 
aus dem getroffenen 
Alien herausfällt, abge- 
schossen wird. Trifft 
man den Mutant nicht, 
so nimmt. der Zerstö- 
rungsgrad der Erde um 
2% zu. 
Wird die Erde zu 100% 
zerstört, ist das Spiel 
zu Ende. 


CPU 25 


ergrößerung 


ZX-Spectrum 16/48 K 


Wer nicht im Assembler. sondern "nur" 
in BASIC programmiert, kann, wenner 
vor der Frage steht, wie ein oder 
mehrere Zeichen vergrößert werden 
können, schon arg in's Grübeln 


10 REM Z-FACHE VERGROESSERUNG kommen 


20 REM a 
30 REM by Thomas Schroeer 
40 REM Tel.06383-7490 
50 REM 
60 REM 


Bevor Sie Ihre grauen Zellen heiß lau- 
fen lassen. greifen Sie lieber zu unserer 
kleinen Routine. mit der die Aufgabe 
schnell gelöst ist. 

In Zeile 90 wird die Größe des/der zu 


70 REM Berechnung + Speichern berechnenden Zeichen in einem Feld 


80 REM im Feld ’a’ 

90 DIM &(8,8) 

100 INK 7 

110 PRINT AT 21,03 "1": 
120 FOR b=0 TO 7 

130 FOR c=0 TO 7 


gespeichert. Durch INK 7 in Zeile 100 
ist das/die in Zeile 110 geprintete(n) 


REM Zu vergroesserndes Zeichen 


140 IF FOINT (c,b) THEN LET a(c,b)=1 THEN LET alctl,b+tl)=l 


150 NEXT c 
160 NEXT b 
170 INK oO 
180 REM Ausdruck 
190 FOR b=1 TO 8 
z00 FOR c=1 TO 8 





Zeichen nicht zu sehen und wird ab 
Zeile 120 in das Feld”a” eingelesen. Bei 
diesem Vorgang könnte es auch ohne, 
daß es vorher in ein Feld abgespeichert 
wird, geplottet werden. Ab Zeile 190 er- 
folgt der Ausdruck. In Zeile 210 kann 
die Ausdruckstelle geändert werden. 
Das Programm sollte speziell modi- 
fiziert in andere Programme ein- 
gebaut werden. 

Durch das einfache Grundprinzip läßt 
sich das Programm sicher auch aufan- 
dere Computer übertragen. 





z210 IF a(c,b)=1: THEN FLOT BO+2%c,b%2: FLOT 79+2%c,b%2: FLOT 80O+2%c,bX2+1: PLOT 


79+2%C,bK2+1 
220 NEXT c 
230 NEXT b 





Händler 


ER Dr 





6630 Saarlouis, 





ELEKTRONIK 


Lothringerstraße 9 
N knninger 


. 





APPLE SHARP EPSON CENTRONICS FELTRON 
IBS Interface SINCI AIR SOFTWARFERSTELLUNG 
Gibitzenhofstr 69. 8500 Nurnberg 1, Tel. (09 11) 677093 


IHR GROSSER PA 
FÜR KLEINE COMPUTER 


DATA BECKER 


Merowingerstr 30 4000 Dusseldort Tei 0211 310010 


26 CPU 


Computerhaus Mast OHG 


ATARI 
:LNN 
Commodore 


DAI 

EACA 
OSBORNE 
SHARP 
TANDY 





BUCHHANDLUNG 


Fachbücher + 
H l N N K | Fachzeitschriften 
für Mikrocomputer 


Gertrudenstraße 2- 4 (Ecke Neumarkt) 
5000 Köin ı Telefon (02211 210528 






Friedrichstraße 84 
5860 Iserlohn 






We-ılı) 
Der 


AM MARSTALL 20/22 + 3000 HANNOVER I 
Z 0511/14629 


jer-Loden 
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CROWN 


für den ZX-Spectrum 48K 


Nachdem das Programm mit RUN ge- 
startet wurde, erscheint das Titelbild. 
Dieses verschwindet automatisch nach 
etwa 15 Sekunden. In dieser Zeit wer- 
den alle DATA-Zeilen gelesen. Da- 
nach baut sich auf dem Bildschirm der 
Spielautomat auf. Ist die begleitende 
Melodie ausgeklungen, erscheintunten 
links ”Einwurf”. Nun kann ein Betrag 
zwischen DM 1,- und 50,- in den 
Münzspeicher gegeben werden (Betrag 
eingeben und ENTER drücken). Es 
können auch ungerade Beträge wie 
z.B. (DM 5,20) eingegeben werden. 
Nachdem der Spieleinsatz (DM -,30) 
vom Münzspeicher abgezogen ist, 
stoppt die erste Walze. Erscheint unter 
der Walze ”"START”, hat der Spieler 
nun die Möglichkeit, mit Hilfe irgend- 
einer Taste die Walze zu starten. Diese 
stoppt dann wieder automatisch. Die 
beiden anderen Walzen können beim 
Erscheinen von ”STOP” vorzeitig 
durch eine Taste angehalten werden. 
Wird ein Gewinn erzielt, so kann dieser 
mit Hilfe einer Taste auf der ent- 
sprechenden Risikoleiste riskiert wer- 
den. Wird keine Taste gedrückt, so wird 
der Betrag nach einer gewissen Zeit in 
den Münzspeicher addiert. 
ACHTUNG! Wie beim Original- 
Crown werden Gewinne sofort in den 
Münzspeicher addiert, wenn Sie eine 
Taste gedrückt halten. Eine Wappen- 
ausspielung wird erzielt, wenn auf je- 
der Walze ein entsprechendes Symbol 
erscheint. Die Ausspielung kann mit 
irgendeiner Taste vorzeitig gestoppt 
und anschließend auf der Risiko- 
leiste riskiert werden. Eine Kronen- 
ausspielung findet auf der mittleren 
Sonderspieltabelle statt. Alle Gewinne 
(auch für Wappenausspielung) werden 
mit unterschiedlicher Häufigkeit ge- 
zogen. Die Chance für den Höchst- 
gewinn (100Sp., 80Sp., 48Sp.) beträgt 
etwa 1 100 und wird bei klei- 
neren Gewinnen größer. Sonderspiele 
werden bis maximal 100 Sp. in den 
Sonderspielzähler addiert. Bei über 
50 Sp. sind keine weiteren Sonder- 
spiele mehr möglich. 

Beim Sonderspielstand 6 und 11 kann 
eine weitere Kronenausspielung erzielt 
werden, wenn auf der mittleren Walze 
eine Krone erscheint. Beim Sonder- 
spielstand 1 und 2 kann bei einem Ge- 
winn der Betrag auf die Risikoleiste 
wieder riskiert werden. Bei Sonderspie- 
len wird ein Gewinn (DM 3,-) erzielt, 
wenn auf der mittleren Walze ein 
gelbes Feld erscheint (40, 60 oder 


September 1984 


te 


8: 
8: 


3 Gomansnınd 
re 


Kronen) oder drei gleiche Beträge auf 
den Walzen erscheinen. 

Überschreitett der Münzspeicher 
DM 90,, so werden im nächsten 
Spiel DM 10,- abgezogen (ausge- 
worfen). Unterschreitet der Münz- 
speicher DM -,0, so erscheint 
unten links wieder ”Einwurf”. 

Sollte es Ihnen zu lange dauern, bis 
eine Ausspielung kommt, so können 
Sie durch Einfügen der entspre- 
chenden Programmzeile eine Aus- 
spielung erzielen. 


Wappenausspielung (links): 
221 LET Wi=12:LET W2=12:LET 
w3=12 


Wappenausspielung (rechts): 
221 LET Wi=10:LET W2=11:LET 
Ww3=10 


Kronenausspielung: 
221 LET: Wi=6LET W2=6:LET 
W3=6 


Das Programm wird im Listing durch 
REM-Zeilen ausreichend erklärt. 


VOSTRO 


REH 

RANDOMIZE 

BORDER 8: PRPER 8: INK 7: C 
1 PRINT AT 7A "OR OU N"IR 
9;"J UB IL E,E" 


PRINT AT 13, 11,0 19384 by" 
13,8; "Peter Sielenann" 
23 PRINT AT 28,9; FLASH 1; 
warten!" 


Bit 


SÖNDERSPIELE'" 
"NICHTS" 
‚keine en 


BIMFRI2): 

DIM vis) 
„4: DIM r$i9,4): 
in y$i12,4): DIM 


"50 SUB 3088 


PAPER 5: INK @: BORDER 4: 


ZXS 


ectrum 





‚s2 ERINN AT an En INK 2; "CROWN 
a uB 


Kren "Dany 42,8 ER 
Baal -380,8: DRAW 1: 


NT,BT 1,1; PARER 7; u 
PR TE re 
PAPER 7, 


„a7; ; "CD" 
85 FOR n=1 TO S: YaRThT AT S+n, 
@;lsin): NEXTn 
85 PLOT 14,185: DRAW 35,0: 
W8,-75: DRAW_-35,0: DRAW 8,75 
_sa FOR n=1 u 9: PRINT AT S+n, 
ı NEXT 
Bas ‚ıDs: DRAU 35,8:_DR 
a,-75: DRAU -35,8: DRAU 8,75 
".8 PRINT AT 19,1;n$; AT 19,35;n 


93 PLOT.8,25: DRAW 51,8: DRAW 
@,-11: DRAU -51,80: DRAW 9,11 
94 PLOT 198,25: DRAW 51,8: DRA 
WM @,-11: DRAW -51,0: DRAW 8,11 
35 ERINT AT_14,18; PAPER 7, "pm 
;AT, 15,108; 
B; AT 16 ao. q ; 
7,10; Y;AT 18,18; 


97 FOR n=1 TO 8: PRINT_AT 
ARE Fee ?7;Lin): NEXT n 


REM 

REM 

FOR_fn= 

co SUB 6598 
INPUT "Einwurf ";ew 

LET eusews1®: LET eu=INT eu 
ew<i@ OR ew>508 THEN GO TO 


LET De 
N E 


bRA 


T 
dm 


Jin 


Sog 


4 IF spi=6 OR 8 1 
; INK 2; "AB" 
=INT (l2#RND} +1 

(12#RNDI +1 
(12#RNDI +1 
TO .5@: BEEP .2l,- 
5 THEN GO SUB 1888 


„PRINT AT 
$iwil); 


THEN PRI 


; riuii;ys PRINT AT 12, 
5; START" 


252 FOR n=i a: _BEEF .‚81,-18 
A IF INKEY$<>"" THEN 60 TO 58 
a 





CPU 27 








IF INKEYS 


NEXT fi 


BEEF 
PRINT AT 12, 


«al,- 


PRINT AT 
‚8; 


To 48: BEER 


WI=INT (l2#RNDI+T 
‚85,18: PRINT AT 5 
In lwi);ahlul); AT 


BEEF 


ai 
„al, 


s3@a BEER 
PAPER 7; 


! 
su: 81 


LET 
wi} =x$ (u3 
THEN LET 9uszi 
allen 

je LET gus 


$ {ml} 
ysiwl) 
u2=8T 

AND w2=5 T 
gu=.1l THEN 
gu=.2 THEN 
au=.3 THEN 

2 AND 3W=.2 THEN LET 

Bd AND gu=.,3 THEN LET 


8 THEN 
gu=d AND 9es<3 


au=d: 
538 


co TO 3008 
THEN 50 TO 
g3u=8 THEN 60 


SUB 82: 50 


THEN LET 
2:THEN LET 
THEN LET 
HEN LET 92 
THEN 50 TO daag 
@ THEN GO _ TO 4588 
OR w24=5 THEN LET 


FOR n=1 TO 
[eis] 

14,2, 
5: BEEP gin! 

PRINT AT 14,2; INVERSE 


28: 
SUB 1588: SUB 912: 


FRINT AT 


so 
INVERSE 1; 13 


„Hin 


a;l$ 


MEET 
m BE ch 
nn © 


28 CPU 





Muenzzaehler 


IF ge<:l1@8 THEN L 


PRINT AT 2,25; 
;AT 2,x2;9er1l8 





e+l TO ge+gaw 
vw dr.n<19o9 "THENTLE 


1530 “Paznr AT 2,28; 
AT 2;: a 

1540 NEXT n 
15580 LET 939€ 
1555 IF ge 
82 

1558 RETURN 
1339 REM 
2082 REM 
2u0l REM 
2085 LET 
zuila FOR 


PAPER 7; "0"; 


@+gu 
aa THEN LET 9e=ge-i 


2025 50 En 1588 
2u30a LET K NT (1BD#RNDI +1 
2e4a IF 2@8_THEN LET kb=1 

2a41l IF @ THEN LET kb 

2842 IF Ö THEN LET K 

2843 IF @ THEN LET Kk 

2044 IF 8a THEN LET K 

2045 IF THEN LET k 

2045 IF THEN LET 

2047 IF THEN LET & 

2a58 LET ikb) 

2050 FOR m=1 TO 4: FOR n 

2a72 FRINT a Jin!,kin); 
; INVERSE 1;1 Y: BEEP ‚a5,12+Ei 

mn! BRINT AT jin),kin!; PAPER 7; 
INVERSE 8; Lin) ’ 

A IF INKEY$<>"" THEN 60 TO 21 


2asa NEXT n: NEXT m 
2128 PRINT AT jikb),Kkikb); 
„f.TNVERSE 1;Likb) 
5 FOR n=1 TO 19: NEXT n 
IF kb=3 OR kb=7 THEN 


2: LET y2=@ 
THEN LET y 
THEN LET 
THEN LET 
THEN LET 


=1.T0 17 
PAPER 7 


PAPER 


so To 


yD=5 
TO 4888 
TO 4528 


zurmeee 
1 Bikarrerererererul 


Ssa2 
To 108: 


2520 PRINT AT 3+m,26; INVERSE 1; 
r$im!: BEEP ‚85,10+m, PRINT AT 3 
+m,2&8; INVERSE 8; r$ im) 

Be IF INKEY$<>"" THEN 60 TO 


2540 NEXT R 
2558 BRuDn AT S+wb,26; INVERSE 1 
chi 
2552 FÜR n=1 ie 18: NEXT n 
2555 LET y2=w 
2562 IF wbe PTHEn co TO 2688 
2570 LET gu=p iub) 
2575 _IF spi<>8 THEN FÜR n=1 TO 2 
@: NEXT_n: PRINT AT S+wb,25;r%$iw 
! so To 308 
@ 20 TO 4528 
LET zp=p iub) 
IF wb=1 THEN GO 
so TO 4592 


LET m=INT 


25 


TO 5988 


LET m=INT 


INVERSE I; 
: BEER 5 Yoin! FRINT AT 
INVERSE 2; 1$ im) 
IF INKEYS<>"" THEN 


NEXT n 


sc To 


PRINT 


AT S+ub,2; IMNVERSE 
NEXT n 


THEN GO TO 





sı08 


ZX Sı 


ectrum 





oimb) 
i<2>@ THEN FOR n=1 
SEEN AT S+ub,2; 





goO TO Saoa 


75 THEN 

5 THEN 

42 THEN 

5 THEN 

15 THEN 

8a THEN T 
THEN LET 


wa<=2 THEN LET ub=1 


IF INKEYSCH"" THEN 
„PRINT AT 8441,2; INVERSE 
I} 


FOR n=1 TO 28 
4040 PRINT AT 7+41l,2; INVERSE 1; 
\${yl-1}: BEEF ‚85,23: PRINT AT 
7+y1,2; INVERSE O; lH (y1- 1) 
Eon IF INKEY$<>"" THEN 60 ro 


2dse PRINT AT 19,1; INVERSE 1; 
: BEEP „85,11: PRINT AT 19,1; 
msn eins 

IF INKEY$<>"" THEN 


NEXT n 

IF 5p<:8 THEN 50 _TO Saao 
FOR n=1 TO 3: BEEP .1,-14 
n 


LET ir=8 
60 _SUB 1528 
N AT 8+41,2; 


aid“ 20 SUB 328: GO TO 2zea 
4200 LET ri=INT (2#RND) 

4210 IF 'ri=8 THEN GO TO 4300 
4228 LET yi=yi-i 
4225 PRINT Ar 8+41,2; 
a ;AT 8+y1,2; 


FOR n=1 TO 7: 


co To 


Al 


so To 


INVERSE 8; 


INVERSE- 8; 
INVERSE 1; \$ 


BEEP bin! ,? 


.THEN G0 TO 4269 
iyll: G0 TO da7ra 
=0 {4 


IF yi1=1 THEN 60 To _Saea 
aBeR n=1 TO 28: NEXT In: 


2 
4sQa PRINT AT 8+41,2; 
L$(y1};AT 19,1; INÜERSE 1;n$ 
4310 FOR n=1 TO 4: BEEP din! 
I: NEXT n 
4330 PRINT AT 19,1; INVERSE d;n% 
4335 IF kra<>2 THEN GO 5UB 5308 
a LET iLr=@: LET sp=8: LET 3u= 


4350 IF ge<3 THEN GO TO _1a8 
Es SUB 998: G0 TO 208 


2+ 


SsoT 
INVERSE %; 


„cin 


IF INKEYScC> THEN 
a AT 8+3y2,26; 


4530” For n=1 To 28 
4540 San AT. 7+32, 
ıc$iy2-1}: BEER "as ,28. 
Sue 38; INVERS ; 
ana IF INKEYS< 


4558 PRINT AT 19,25; INUE 
%: BEEF .a5,1ii1: PRINT AT 
INUERSE d;n$ 

55 IF INKEY$<>"" THEN 


SO TO 45 
INVERSE 1 
INVERSE 1 

PRINT AT 


47 


so To 


s0 TO Seas 
BEEP „i,-14 


15 
ERINT AT S+y2, 


isio” EM SUB s28: 
4700 LET ri=INT 
4718 


26; INVER 
co TO 


200 
r (ZERND) 
IF ri=@ THEN 50 TO asoo 


se a 
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60 TO 47 
y2) 
EN 60 TO 508 
20: NEXT 
INVERSE a 
ses iy2l; INVERSE 1;n$ 
4s10 FOR n=1 BEEP din),cin 
): NEXT n 
4838 PRINT AT 19,25 


4335 IF N »@ THEN 
De LET rr=8: 


4358 


= 





+92 ,26; 
7 =; 
INVERSE 8;n 


GO SUB 5328 
LET sp=B8: LET gu= 


IF ge<3 THEN G0_TO 108 
saa: GO TO 208 


PRINT AT 19,9 
LET 


5 URN 
6588 FÜR n=1 TO 17: BEEP iin),ht 
n}+12: NEXT n: FOR n=1 TO 18: NE 
“T n: FOR n=15 TO 22: BEEP iin!, 
hin}+il2: NEXT n 


k2=0 





saas 
AT.n 
Sala 
xTn 
Sp1l15 
xTn 














KENZ 
RERD Jin) 


RERD Kini: 


PRINT AT 29,10; 
FOR n 
LET x1= 
IF n<«1a@ THEN LET 
IF n<1@ THEN LET » 
BEER ‚85,n72-10: 
PAPER 7;n 


IF n=188 THEN 
NEXT n 
FOR n=1 TO 18: 
IF sp>4a THEN GO 
G0 TO 5852 
sesa_ FÜR n=1 TO 5: 
NEXT n: 
BEEP ‚4,ui5} 
sas2 IF kro<>@ THEN GO 
saSs4 IF rr<>2 THEN GO 
sass IF Irc>@ THEN CO 
THEN 
ö THEN 


LET sp=8 


PALEn 
60 TO 218 





PRINT AT 2 


IF n=5@a THEN G0 SUB 52 
c0 TO Sı1o8 


NEXT n 
SUB 8588: 


BEEP 
FOR n=1 TO 18: 


se20 
PEN 
2,.2,:5 
8030 FÜR n= 
ExTn 
sa42 DATA 
8,5,1,5,2 


sasea F 


ala] 


2,uim}: 
NEXT n: 


SUB 5308 
SUB 5458 
SUB 5429 
so _ TO _ 198 
SO SUB S9B: 
so To 


sp=® 


28 THEN 50 SUB 5308 


LET 


A sp=d 
co TO 218 
9; 


FLASH 1;t$ 


PRINT BEE RIS SEAT 


; INVERSE & 
S31@ LET kro=@: RETURN 
5408 PRINT AT 8+41,2; 
L$iyli 
5410 LET ir=8: RETURN 
S4S5a PRINT AT 8+32,26; 


ir$iy2) 
u RETURN 
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Syrd,.l 


TIER 


5: RERD 
5: 
8,6,11,.1, 


Br 
gr 





Fin): NE 

KTrn 
sis» FOR 
xTn 


RERD gin!: NE 


1,.1, 





RERb 
RERD 


hin): N 
sı3a FOR 
ıin) N 


"ara 2,8, 
DATA 
DATA 
FÜR n=i1 
"para 6,5,56,6,5, 


READ (sin): 


Sıso DATA 48,24,12,6, 


RERAD Lin) 


n=1 TO 


nal ra 1a Acad FAR 





RERAD yin!: 
B,.ı1,.1,.1,4,4 
A,.l,.l,s 
RERD ain!: N 
RERD 


RERD sin): N 


rind: N 
=ISTOTTEN 
2,0,0,8,0,08,1,1,4, 
2,2,8,0,0,2,2,2,0,0,8, 
2,8,8,0,80,2,8, ‚8,1, 
TO 12%. RERD tin): N 


- 7,7,7 
RE RrÄnice Near 


2,8 


RETURN 


SAUE 





Anzeigenpreise: 
Es gilt die A, 
1983. Bitte Media-Unterlagen anfordern. 





igenpreisliste Nr. 1 vom 1. 8. 


Urheberrecht: 

Alle in CPU veröffentlichen Beiträge sind urhe- 
berrechtlich geschützt. Alle Rechte, auch Über- 
setzungen, vorbehalten. 

Reproduktionen jeder Art (Fotokopie, Microfilm, 
Erfassung in Datenverarbeitungsanlagen, usw.) 
bedürfen der schriftlichen Genehmigung des 
Verlags. Alle veröffentlichte Software wurde von 
Mitarbeitern des Verlages oder von freien Mitar- 
beitern erstellt. 

‚Aus ihrer Veröffentlichung kann nicht geschlos- 
sen werden, daß die beschriebenen Lösungen 
‚oder Bezeichnungen frei von Schutzrechten sind. 








Bei Zusendung von Manuskripten und Software, 
erteilt der Autor dem Verlag die Genehmigung 
zum Abdruck und Versand der veröffentlichten 
Programme auf Datenträger. 


"CROWN" LINE 1 


Rücksendung erfolgt nur gegen Erstattung der 
Unkosten. Zusendungen von Software zur Ver- 
öffentlichung soll bitte folgendes enthalten: 
Kopierfähige Kassette oder Diskette mit dem 
Programm (Computer-Bezeiehnung), von Druk- 
ker erstelltes Listing oder Serie von Bildschirm- 
fotos (keine Schreibmaschinenlistings), evtl. 
Bildschirmfotos von einem Probelauf, ausführ- 
liche Programmbeschreibung. (Erklärung der 
Variablenliste, Beschreibung des Bildschirm- 
aufbaues, Farbe, Grafik usw.) 

Für eingesandte Programmunterlagen kann kei- 
nerlei Haftung übernommen werden. 

IVW geprüft. 
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| Commodore 


Grafik 


für den C-64 


Das Programm liegt im Bereich von 
C000bis C5BO. Die Bildschirm-Map 
liegt ab E000. Der als Farbram benutzte 
Videoram liegt ab CC00. Wird das Pro- 
gramm als Maschinenprogramm gela- 
den, muß es nach NEW mit SYS 49188 
initialisiert werden. Dies erübrigt sich 
beim Einlesen mit den Grafik-Datas, 
da dieses nach dem Einpoken der 
Daten selbst initialisiert. Nach dem 
Einlesen versteht der Basic-Interpreter 
die neuen Basic-Befehle, die alle mit”!” 
beginnen. Es genügt stets die Angabe 
der ersten 3 Buchstaben. 


Erklärung der Befehle: 

!RCOL(D: Rahmenfarbe mit Farbcode I 
!BCOL(D: Hintergrundfarbe im 
Schriftmode 

!CURSOR (Zeile, Spalte): Setzen des 
Cursors 

!GRAFIK(K): K= 1 Einschalten der 
Grafik im Single-Color-Mode 

K= 2 Einschalten der Grafik im Multi- 
Color-Mode 

K = 0 Zurückschalten in den Schrift- 
Mode 

!CLEAR Löschen der Bildschirm-Map 


Für den Single-Color-Mode gelten fol- 
gende Befehle: 
!DCOL(I,K) Setzen der Farbe 


1B REM GRAFIE DATA 
15 REM INGE BECHMANN 
28 RESTORE: 2=49152 
32 FORI=@TO1456 

428 READA:FOKEZ+I,A 
58 NEXT 

sa SYS4Y1B8: NEW 

8Q END 

1208 
1201 
1202 
1003 
1004 
1205 
120% 
1087 
1008 
1209 
1218 


DATA228,141,8,3,169,167 


DATAZ,142,87 
DATA138,173,32,247,18%, 
DATA157,67,3,232,142,87 
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Das folgende Grafik-Programm soll die bekanntlich sehr umständ- 
liche Handhabung des C-64 im Grafik-Modus softwaremäßig er- 
leichtern. Es werden eine Reihe neuer, nützlicher Befehle definiert, 
die wie die bekannten Basic-Befehle in Basic-Programmen aufgeru- 


fen werden können. Da die 8k-Bildschirm-Map im "versteckten? 
RAM liegt, beansprucht das Programm keinen Basic-Speicher- 


platz. 


«I = Code für Punktfarbe 
K = Code für Hintergrundfarbe 
!DOT(X,Y) Setzt Punkt bei Koordi- 
nate X,Y 
X-Bereich von 0 bis 319, Y-Bereich von 
0 bis 199 
Der Nullpunkt 0,0 liegt im Bildschirm 
links unten 
!CDOT(X,Y) Löschen eines Punktes 
!LINE(X1,Y1,X2,Y2,) zieht eine Linie 
von X1,Y1 bis X2,Y2 
CLINE löscht eine Linie 
'TEXT”’SCHRIFT” schreibt Buchsta- 
ben ab der Position, die vorher mit 
!ICURSOR(X,Y) definiert wurde. Im 
Gegensatz zum normalen PRINT- 
Befehl werden Variable oder Strings 
mit !TEXT””Variable geschrieben. Mit 
Commodore/Shift läßt sich vorher be- 
stimmen, ob der normale Schriftsatz 
Groß-Klein-Schreibung benutzt wer- 
den soll. In Programmen läßt sich vor 
der TEXT-Anweisungmit PRINTCHR 
(14) auf Groß-Klein-Schreibung u. mit 
PRINTCHR (142) auf Normalschrift 
umschalten. 


Für den Multi-Color-Mode gelten fol- 
gende Befehle: 

!DCOL(IO,I1,12,13) setzt die 4 mög- 
lichen Farben. I0=Code für Hinter- 
grundfarbe. Beim Zeichnen von 


2220 WEDEL 


DATA68,79,84,67,68,79,67,76,69,71,82,65,66,67,79,68 
DATA&7,79,82,67,79,76,73,78,67,76,73,84,69,88,67,85 
DATAB2,79,70,70,169,58,141,8,3 


„141,9,3,96,32,115,8 


169,192,141,9,3,96,169 
201,33,240 
DATA6,32,121,8,76,231,167,162,255,142,87,3,32,115,0,201 
DATAQ,240,101,201,58,240,97,201,34,240,93,2 
DATA87,3,232,224,9,208,3,76,72,178,224,2 


76,76,192,162,0,142,87,: 


Punkten und Linien ist hinter den 
Koordinaten, durch Komma getrennt, 
die vorher definierte Farbnummer 0-3 
anzugeben. Z.B.: 
!DCOU(5,13,0,1):"LINE(0,100,319,100,1) 
zeichnet eine hellgrüne Linie auf 
dunkelgrünem Hintergrund. 
!LINE(X1,Y1,X2,Y2,0) löscht Linie 
OFF Die mit SYS 49188 initialisierten 
Befehle werden abgeschaltet 
Benutzung von Sprites im Grafik- 
Programm: 

Sollen im Grafik-Mode Sprites benutzt 
werden, so ergeben sich gegenüber dem 
Normalmodus einige Änderungen: 
Die 8 Sprite-Pointer müssen in Adres- 
sen 53240-53247 geschrieben werden 
(Normalmodus 2040-2047). 

Die Werte der Pointer für Sprite 0,1,2,..- 
müssen lauten 23,24,25,..(Normalmo- 
dus 11,12,13,...). 

Die Sprites selbst müssen abge- 
speichert werden in den Adressen 
49152 + Pointer-Wert x 64 (Normal- 
modus Pointer-Wert x 64). Beispiel: 
Definition von Sprite 0 - In Zelle 
53240 muß stehen: 23. Der Sprite 
wird abgespeichert ab 49152 + 23 
x 64 = 50624 


v2 


174,87,3,165,20,157,67,3,232,165,21 
,3,224,12,144,3,76,72,178,32,121 


DATAQ,201,44,240,215,2@1,41,240,3,76,72,178,32,115,80,76 
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DATA184,192,32,121,0,76,174,167,162,0,224,53,176,59,173,62 
221,0,192,240,6,2 2,232,76,186,192,232,173,63,3 
2 42223 ‚7, 186,192,232,173,64,3,221,8 
2 78,186,192,189,251,192,141,244,192,189,252,192 
DATA141,245,192 ‚52,48,193,76, 178,192,76,8,175,44,247,193,44 
DAIA244,1 1,44,50,193,44,39,193,44,173,198,44,32 
DATAL93,44, 43.194} 44,,240,194,44,165,196,44,118,196,44,46,193 
3,141,32,208,96,173,67,3,141,33,208,96,32,47 
DATA192,96.173,67,3,201,0,240,9,201,1,240,26,201,2,240 
DATAG2, 96,169 ,21,141,24,208,169,27,141,17,209,169,200,141,22 
DATA2@8,169,151,141,0,221,96,169,56,13,24,208,141,24,208,169 
DATASY,141,17,208,169, 200,141 ,22,208,169,148,141,0,221,32,219 
DATA19G,169,12,141,67,3,169,5,141, 69,3,32,173,193,96, 169 
DATAS6, 13,24, 208, 141,24,208,169,59,141,17,208,169,216,141,22 
; DATA209,169,148,141,0,221,32,219,193,169,5, 141,67,3,469,13 
DATA141,69,3,141,71,3,141,73,3,32,173,198,96,169,16,45 
DATA22, 208,240,3,76,65,196 169,0, 133,291,169,204,133,252,173 
DATA67,3,10,10,10,10,24,109,69,3,160,0,162,3,32,233 
DATA193,16@,231,145,251,136,208,281,145,251,96,169,0,133,281,169 
DATAR24, 252,164,251,162,32,169,0,145,251,200,208,251,230,252 
DATA2@2,208,246,96,169,136,44,169,16,133,253,173,22,2@8,141,99 
YATAS,281,216,208,8,173,67,3,74,10,141,67,3,173,68,3 
DATA24O,10,173,67,3,201,64,144,3,76,72,178,173,70,3,24@ 
3,76,72,178,173,69,3,201,200,144,3,76,72,178, 173,67 
141,87,3,173,68,3,141,88,3,56,169,199,237,69,3 
DATA141,89,3,170,74,74,74,10,168,185,182,194,141,89,3,185 
3,194,141,90,3,138,41,7,24,189,89,3,141,89,3,173 
DATAB7 ,3,41,248,141 ,87,3,24,169,0,109,87,3,133,2514169 
DAT ‚109,99,3,132,252,24,165,251,189,89,3,133,251,165,252 
DATA109,90,3,133,282,173,67,3,41,7 7a 170,165,1,72 
DATA169,52,120,133,1,169,216,205,99,3,208,3,76,18,196,189 
"194,160,0,196,253,48,5,73,255,49,251,44,17,251,145 
DATA251,104,133,1,88,96,0,0,64,1,128,2,192,3,80,5 
DATA&A ,5,128,7,192,8,0,10,64,11,128,12,192,13,0,15 
DATAG4,15,128,17,192,18,0,20,64,21,128,22,192,23,0,25 
DATA64 26, 128,27,192,28,0,30,1,2,4,8,16,32,64, 128 
DATA169,129,44,169,17, 133,253,173,69,3,141, 95,3,56,173,73 
1048 y,3,168,169,0,233,0,32,149,179,32,43, 188,141 
1049. DAT Ä 187,56,173,7143,237,67,3,141,87,3,178 
1050 ‚237,68,3,141,88,3,10,176,10,169,1,141,91,3 
DATA169,0,141,92,3,240,8,169,255,141,91,3,141,92,%,24 
DATAL73,87,3,109,91,3,168,173,88,3,109,92,3,32,149,17%9 
DATA160,0,169,87, 32,15,187,32,202,187,169,0,141,96,3,141 
DATA97 2,2 3,109,91,3,141,71,34,173,72,3,10% 
DATAS: 3,24,173,96,3.109,91,3,141,96,3,168 
DATA173,97,3,109,92,3,141,97,3,32,149,179,160,0,169,87 
DATAS2,40,186,32,191,177,24,173,95,3,101,1@1,141,98,7,56 
DATA173,69,3,237,93,3,205, 98,3,208,3,141,69,3,24,178 
DATA9B,3,109, 3,141,98,3,173,71,3,72,173,75,3,141 
DATA71,3,173,68,3,72,173,67,3 72,32,251,193,104,141,67 
DATA3,104,141,68,3,104,141,71,3,24,173,69,3,1989,93,3 
DATA141,69 205,98, 3, 208,208, 24,173,67,3,109,91,5,141 
DATA67,3,173,68,3,109,92,3,141,68,3,173,67,3,205,71 
DATAZ,240,3,76,117,195,173,68,3,205,72,3,240,3,76,117 
DATA195,96,189,232,194,141,87,3,24,74,109,87,3,73,255,168 
DATAB,49,251,145, SL Sale uereeen 0,240,8, 10 
DATA1Q,202,202,224,0,208,248,24,113,251,145,251,104,133,1,8 
RE Te 67,3,173,71,3,141,69,2 
DATA32,183,193,169,0,133,251,169,216,133,252,173,73,3, 
DATAL62,3,145,251,200,208,251,230,252,202,208,246,16@,231,1 
DATA1L36,208,251,145,251,96,56,32,24Q,255,142,87,3,140,88,3 
DATA169,24,205,67,3,176,6,174,87,3,76,144,196,174,67 5 
DATA169,39,205,69,3,176,6, 172,88)3,76,160,196,172,69,3 
DATA24,32,240,255,96, 72,169,211, 141,38,3,169,196, 141,39 
DATA173,24,208,41,2,240,8,169,216, 141,91,3,76, 196,196, 169 
DATA228,141,91,3,104,32,160,170,169, 202,141,38,3,169,241,14 
DATAS9,S, 96,72.141,98,3,138,72,152,72,173,96, „16,3 
DATA76,253,196,201,32,144,13,201,96,144,4,41,223,208,2 
DATA63,76,12,197,201,18,208,31,133,199,76,23,197,41, 
DATA18,208,7,169,0,133,199,76,23,197,9,64,166,199,2% 
DATA208,2,9,128,76,26,197,76,152,197,162,0,142,88,3,24 
DATA1D,144.3,238,88,3,14,88,3,10,144,3,238,88,3,14 
3 DATAB8,3,10,144,3,238,88,3,24,133,251,173,88,3,109,71 
DATA3,133,252,165,210,41,3,141,88,3,24,165,209, 101,211,141 
; DATA87,3,169,0,129,88,3,141,88,3,160,3,14,88,3,14 
DATAB7,3,144,3,238,88,3, 136,208, 242,24, 173,87 
DATA173,88,3,105,224,133 ‚254,160,7,32,160,197,145,253, 136,1 
DATA248,56, 3, 240,255,192,39,176,4,200,76,148,197, 160,0,22% 
DATA24,176,1,2 32,24 ,32,240,255, 104, 168,104, 170,104,24,88,9% 
DATA165,1,72,169,49,120,133,1,177,251,170,104,133,1,88,138, 
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wIcosort 


Christian.Widuch 
Nordstraße.22 
3443 Herleshausen: 
Tel. 05654/6182 





Bei uns finden Sie ständig eine 
:große Auswahl von Superprogram- 
men für sämtliche Heimcomputer. 
Benutzen Sie bitte die Bestellkarte 
auf der;Umschlagseite und fordern 
5 Unseren Katalog an mit über 250 
;Programmangeboten (gegen eine 
Schutzgebühr von 3,- DM). 





Kassette 19 
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Diskette 25.00 

























für den Commodore 64 


oder besser "Ballonfahrt” (Ballons flie- 
gen nicht, sondern ”fahren”) ist ein 
reizvolles Spiel mit viel Farbe. 

Sie haben 3 Ballons, mit denen Sie4Le- 
vels durchstehen müssen: Zunächst 
"fliegen” Sie in einer Stadt von einem 
Haus mit purpurfarbener Landefläche 
zu einem anderen (gelbe Plattform) 
und setzen dort auf. Dann geht's quer- 
feldein und über mehrere Berge hin- 
weg, auf denen übel gesonnene 
Drachen wohnen. 

Weder Drache noch Berg dürfen be- 
rührt werden. Im dritten Level muß 
man versuchen, den linken Bild- 
schirmrand zu erreichen, hat aber wie- 
der mit diversen Hindernissen zu tun. 
Im vierten und letzten Level müssen Sie 
dann.noch eine kleine Seeschlacht mei- 
stern und soviele Schnell- und U-Boote 
abschießen als irgend möglich. 

Aber soweit werden Sie wohl gar nicht 
erst kommen... 

Variablen: 

V Basisadresse für Sprites 

Si Pokeadresse für Musik, ebenso Th, 
TI, Fh, LI, A, H, Ww 

Vi Pokeadresse für Zeichen 

Bi Pokeadresse für Farben 

P Punkte 

F Zähler für Punkte 


REM 
REM * BALLONFLUG * 
REM 


eesemORRERRRr 
POKES3288,8:POKES3281,6:PRINT"L'":DIMG(65) 


DATA 8,8,8 
DATA 8,12,8 
DATA 8,63,8 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 8,192,192 
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L Levelzähler 

M Anzahl der Ballons 

X,Y,D Diese Variablen sind für das 
Musikprogramm dimensioniert 

D Variable zum Daten einlesen 

Z Countdown in Level I 

C Variable für Abfrage Sprite-Sprite 
Kollision 

J Joystickabfrage 

I Allgemeine Variable für FOR..NEXT- 
Schleifen 

K,W Variable für Abfrage Sprite- 
Hintergrund Kollision 

t$ Variable bei GET-Anweisungen 
B1$-B5$ String für Berge 

C1$-C8$ String für Höhle 

X-X8 Variable für X-Koordinaten der 
8 Sprites 

Y-Y8 Variable für Y-Koordinaten der 
8 Sprites 


Programmstruktur: 

90-400 Datazeile für Level I 

500-598 Festlegung von Adressen und 
Strings 

600-660 Einlesen und Einpoken der 
Strings 


1000-1200 Spiel für Level 2 

670-690 Sprungbefehle und Graphik 
für Level 2 

1500-1595 Spiel Level 3 im Lo-Byte 


DATA 8,288,192 
DATA 0,21,8 
DATA 8,63,8 
DATA 8,55,8 
DATA 8,55,8 
DATA 8,63,8 


REM DATA FUER DRACHEN 


DATA 0,8,7,8,8,63 


DATA 8,1,254,0,7,252 


Commodore 64 


Register 

1600-1700 Graphik für Level 3 
1800-1896 Spiel für Level 3 im Hy- 
Byte Register 

2000-2520 Schuß im 4. Level 
3000-3016 Einlesen der Musik 
3020-3070 Spielen der Musik. 
3080-3210 Data’s für Musik 
5000-5500 Spielanleitung 

6000-6500 Spielfeldanzeige für Level 2 
und 4 

7000-7030 Fehler wird angezeigt 
7040-7980 Data und Graphik für 
GAME OVER 

9000-9115 Graphik für Level 1 
9120-9207 Spiel Level 1 im Lo-Byte 
Register 

9210-9310 Spiel Level 1 im Hy-Byte 
Register 

9400-9450 Level 2 wird erreicht 
9600-9640 Wind für Level 1 
oa Fehler und Punkte im Le- 
ve) 

11000-11999 GAME OVER im Level 4 
18000-18010 Fehler - Spiel geht in Le- 
vel 3 weiter 

20000-20120 Data’s für Level 4 
20125-20340 Sprites für Level 4 werden 
eingelesen und eingepoked 
21000-22000 Spiel für Level 4 


DATA 8,31,248,8,63,192 
DATA 24,255,128,60,255,8 
DATA 207,254,0,127,255,0 
DATA 121,255,128,1,255,224 


DATA 


1,255,248,6,255,204 


DATA 8,255,134,8,127,128 


DATA 8,51,0,8,49,192 


DATA 0,28,224,6,12,112,0,0,0 


DATA 7,224,0,63,255,8 


DATA 127,255,240,255,255,255 
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DATA 255,255,255,255,255,252 

DATA 127,255,240,127,255,192 

DATA 63,254,8,15,240,0 

DATA 8,8,0,0,8,8,0,0,0,0,0,0,8,0,0,8,0,8,8,0,0,6,8,0,8,08,0,8,8,8,8,0,8 
REM ADDRSSEN 

V=53248:51=55296::V1=1024:M=3:Z=106 
%=50:Y=128:POKEVU+16,8:POKEV+21,0:P=8 

DIMX<(35) :DIMYC35):DIMD(35) 


ERROR 
REM SPRITES EINLESEN 
FORI=61062 :READD :POKE784+1,D: NEXT 
FORI1=0T062:READD :POKE832+1,D:NEXT 
FORI=0T062:READD:POKE968+1,D: NEXT 
POKEV+23,8:POKEV+29,8 
POKEV+28,1:POKEV+37,18:POKEV+38,8:POKEV+39,1:POKEV+27,0:POKEV+48,5 
POKE2048,11:POKE2041,13:POKEV+29,6:POKE2042,13:POKEV+41,5 
60SUB 3086 :605U85008 
GOSUB9808 : GOSUBGOBH :F=P 
POKEU+27,255:1L=2:POKEV+241,7:POKEV+29,6 


ı" 


REM * SPIEL LEVEL 2 * 

REM essen nenee r 
PRINT"EIS"TABC35) "'LELLLLLEERN SL 
PRINTTAB(35) ; "Lk 
PRINTTAB< 33) "ERLELLLIOHMS/NM“ ; 
x2=255:72=230:%3=120:73=70:POKEV+21,7 
J=PEEK(56320) E 
IF<CJANDA)=OTHENY=Y-4 
IFCJAND2)=OTHENY=Y+4 
IFCJAND4)=OTHENX=X-4 
IFCJANDSI=BTHENX=K+4 
K3=X3-4:X2=X2-4 
IFX2<OTHENX2=255:V2=INTCRND<O)«1LO)+Y 
IFX3<OTHENX3=255:93=Y-INTCRND(B)#10) 
IFXD255THENX=255 

IFYD223THENY=228 

IFY<48THENY=48 

IFX<OTHENZ=8 
POKEUV,X:POKEV+1,V:POKEV+2,X2:POKEV+3,V2 
POKEV+4,X3:POKEV+5,Y3 
POKEV+390,0:C=PEEK (V+30) 
IFC=30RC=STHENGOSUB7088 
POKEUV+31,8:K=PEEK(V+31) 
IFK=1THENGOSUB7608 

IFY2<YTHENY2=Y2+3 

IFY3<YTHENY3=Y3+3 


=INT<F):H=INT(C (255-9374) 


PRINTTAB<?5); 

PRINTTAB(33); 

IFP>LAITHENLSBB 

60701828 

REM MBememeuenne 

REM * LEVEL 3 * 

REM HeesenmaHee 

POKEV+21,1:POKEV,60:POKEV+1,158:POKEV+38,6:POKEV+29,8:POKEV+23,0 

T=506:60SUB3828::3=60:: Y=150:60SUB15088 

IFPEEK<(V+16)=ıTHEN1808 

T=T-5:J=PEEK(56328) 

IF<JANDA)=SOTHENY=Y-4 

IFCJANDZI=OTHENY=Y+4 

IF<JAND4)=BTHENX 

IFCJANDSI=BTHENX=X+4 

IFX<38THENX=38 

IFXD255THEN1808 

IFYD228THENS=228 

IFY<36THENY=38 

POKEV+31,0:C=PEEK(V+31) 

IFC=1THENGOSUB7088 :G0SUBI180U8 

POKEV,X:POKEV+1,Y:60SUB1688:60T01520 

REM STEUER 

CAS=RIGHTS(CAS,39)+LEFTSCCAS,1) 
IGHTSCC2$5,39)s;LEFTS(CC2S,1) 
IGHTS«C3S,39) +LEFTSCC3ZS,1) 

C45=RIGHTSCC45,39) +LEFTSCC4S,1) 
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S=RIGHISCCHS,. BY) HLENFTSCEHS, ID 
1686 C65-RIGHTS(C6E5, 39) +LEFTSCCES, 1) 
1607 C7S=RIGHTSCCT5,39I+LEFTSCCTS,1) 
1608 C8BS=RIGHT5CCBS,39)+LEFTSCCBS,1) 
1651 PRINT"sLELLELE 
1652 PRINTC15;C25;C3$;C045;C55;C06$;C07$;C8$ 
1786 RETURN 
18660 X=0:POK£V+16,1:POKEU,X 
1820 J=PEEK(56320) 
1030 ITCIRSEAI=OTNENY=Y 4 
1840 IFCIAND2)=BTHENY=SYrA4 
18506 IFCJAND4)=BÖTHENX=X-4 
1860 IFXJANDBSISBTHENX=X +4 
1878 IFX<OTHENPOKEV+16,0:%=255:POKEUV,255:60101528 
1880 IFX<OTHENPOKEV+16,8:%=255:POKEV, 255:60T01520 
41885 IFX>7STHENP=P+ABS<CT)+100:60T020008 
1887 IFYDZZBIHENX=228 
1890 IFY<3OTHENY=38 
4891 POKEV,X:POKEV+A,Y:T=1-2 
1892 POKEV+31,0:C=PEEK(V+31) 
5 IFC=1THENGOSUB7888 :60SUB18008 
1896 0054UB1608:69T01820 
2000 X2=X+16.Y2=Y+10 
2010 POKEY+2,X2:POKEV+3,V2:5=1 
2028 RETURN 
2590 Y2=V2r& 
2505 IFY2D25BTHENY2=0:5=0 
2516 POKELU+3,YV2 
2526 RETURN 





































































SI:FH=SI+1:TL=SI+2 
ä Ir4:A=SI+5:H=SI+6:LL=SI+24 
30414 FORI=1T03-4:READX READY: READD 
3616 XCI)=X:YC19=Y:DCI)=D:NEXT:RETURN 
3028 FORI=1T034: IFT=5O8THENI=I+1 
3030 POKELL,1S -POKETH,13 
3066 PUKETL,15:POKER,2 *16+10:POKEN,15 
3076 POKEFH,XC1) :POKEFL,YCI) -POKEMN, 33:FORJ=1TODCI) :NEXT:POKENWN, 8: NEXT :RETURN 
3088 REM DATA FUER MUSIK 
3090 DATA23,59,250,23,59,125,23,59,250,23,59,375,26,20,125,29,69,125,31,3,125 
31-40 DATA29,69,375,0,0,750 
3150 DA1N23,59,250,23,59,125,23,59,250,23,59,375,26,20,125,29,69,125,31,3,125 
3160 DATA29,69,325,0,0,750 
3180 DATN2G,20,250,26,20,125,26,20,250,26,20,250,29,69,250,26,20,250,29,69,250 
3198 DATA23,59,1000 
3206 DATA26,20,250,26,20,125,26,20,250,26,20,250,29,69,250,26,20,250,29,69,250 
3210 DATA23,59,1000 
5600 REM SPIELANLEITUNG 
5810 PRINTAL:PRINT"W BALLONFLUG"" 
DIESES SPIEL BESTEHT AUS 4" 
VERSCHIEDENEN SPIELSTUFEN :"" 
4. SIE MUESSEN BEI WIND VON DER "" 
APURPURFARBENEN |4PLATTFORM ZUR" 
EIGELBEN lAFLIEGEN." ö 
2. SIE MUESSEN DEN DRACHEN AUSHEICHEN" 
BEI 150 PUNKTEN KOMMEN SIE IN" 
LEVEL 3." 
3. NUN GEHT ES DURCH DIE HOENHLE ABER" 
NICHT GEGEN DIE FELSEN FLIEGEN." 
4. BEIM WASSER MUESSEN SIE VORBEI-" 
FAHRENDE SCHIFFE ABSCHISSEN ODER" 
DIE U-BOOTE TREFFEN." - 
ZUM SPIELANFANG TASTE DRUECKEN" 
5400 POKEV+21,1:POKEU+16,1:POKEV, 40: POKEU+1,70 
5499 GETTS: IFTS=""THEN5408 
5499 POKEU+16,0:POKEU+21,0 
5500 RETURN 
66086 REM SPIELFELD 
6918 PRINT"L"TABC32) "A 
6020 FORI=1T023 
6038 PRINT" 
6040 NEXT 
6100 FORI=1T08:POKEVI+391+1,160:NEXT 
6118 FORI=1108:POKEBI+9941+1,1:NEXT 
6288 PRINT’; TABC33) ;"LLAUHOEHE :"* 
210 PRINTTAB(33) ; "LLLILEUEL : 
6220 PRINTTAB<33) ; "LEINBALLON" 
6236 PRINTTAB<33) ; "LLLINPUNKTE" 
6500 RETURN 
7008 REM ABGANG 
7665 IFL=ATHENIFPEEK(U+16)=1THENPOKEU+16,8 
76i6 Men-i:Y7=iRTıiRuDiV)Ri787+456 
7015 FORY!=61045:POKES3288,45-1:POKES3281,1:NEXT:POKESI28B1,6 
7647 IFL=4ANDMLATHENL1866 
7028 IFMCATHEN7040 
7025 PRINT"EL) SIE SIND DRAUFGLGANGEN" 
7827 FORI=1T02880: NEXT 
7029 PRINTER = 
7638 RETURN 
7048 POKEY+21,0:PRINT"U SIE SINDW TOT 
7108 FORI=01032:READD:POKE832+1,D:NEXT 
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FOR1=331062 :FÜKL832+1,0 NEXT 

7128 FORI=6T032:RENDD:POKEBIG+I,D: NEXT 

7136 FORI1=33T062:POKE896+1,8: NEXT 

7148 POKE2041,13:POKE2642,14 

7798 DATA 51,51,51,204,204,204 

7718 DATA 48,0,0,199,187,238 

720 DATA 52,42,168,197,186,174 

7739 DATA 52,170,168,199,170,174 

7740 DATA 48,0,0,204,204,284,51,51,5i1 

7750 DATA 51,51,48,204,204,204 

7760 DATA 8,0,48,58,187,140 s > 

7780 DATA 42,162,176 „42,179,140 

7796 DATA -42,163,-48,57,58,140 

7795 DATA 0,0,-48,204,204,204,51,51,48 

7860 Xx1=0:X2=255:POKEY,148:POKEV+1,122:POKEV+3,124:POKEV+5,124 

7805 POKEV+21,7:POKEV+27,1:POKEV+23,6:POKEV+29,6:POKEU+48,7:POKEU+41,7 

7810 ,FORI1=010182 :Xi1=X1+1:x2=22-1 

7820 POKEV+2,X1:POKEV+4,X2:NEXT 

7830 POKEV+21,6 

79680 FORI=1T036:POKLV+48,1:POKEV+41,1:FORH=iT040:NEXTH, TI 

7956 PRINT’ELIIN WOLLEN SIE NOCHMAL ? LJ,NI" 

7966 GETTS: IFTS="N"THENPRINTG":POKEU+21,8:END 

7978 IFTS="J’THENRUN 

7988 60107966 

960808 REM STADT 

9001 REM MeenensnnnERHRREREE 

9802 REM * SPIEL LEVEL 1 * 

9003 REM 3URHRRHEBEMORHHRRER 

9818 PRINTLILLLLLELRLIN" 

90820 PRINTTAB(24) 

90825 PRINTTAB(24) 

9027 PRINTTAB(24)" 

93028 PRINTTAB(24 

9029 PRINTTAB(24) 

9038 PRINTTAB(24) 

930341 PRINTTAB(24) 

90832 PRINTTAB<C24) 

90833 PRINTTAB(24 

9834 PRINTTAB(24) 

93935 PRINTTAB(2H 
PRINTTAB<(2-H 















9036 
9050 PRINT"ELELELLR 
9051 FORI=1T03:PRINTTAB<A0)" I":NEXT 





90609 G0SUB3H28 
91088 x=50:9=192:POKEUV,X:POKEV+1,Y:2=100:POKEV+21,193:POKEY+12, 210: POKE2847,15 
9116 POKEV+45,15:POKEUV+46,1:POKEV+13,60:POKEV+14,70:POKEV+15,80:POKE2046,15 
9115 POKEV+29,192:L=1 
9128 J=PEEK(56328) 
9138 IFCJANDLI=BTHENY=Y-2 
91409 IFCJAND2I=ÖTHENY 
9158 IFCJAND+)=OTHENX=-4 
9168 IFCJANDBI=ÖTHENX=X+4 
9180 G0OSUBY6BHO 
9198 IFXD255THENI216 
9192 IFY>228THENY=228 
9193 IFYCA4BTHENY=48 

“ 9135 IF XXBTHERX= 
9197 POKEV,X:POKEU+L,Y 
9200 IFX=50ANDY=192THEN9285 
9201 POKEY+31,9:W=PEEK (V+31) 
92082 IFW=1THENGOSUB7888:60T09108 
9285 IFXD229ANDX<239THENIFY=152THENP=Z:60SUB3828:60T09408 
9207 GOTOI120 
9210 POKEV+16,1:%=0 
92308 IF(JANDII=BTHENY=Y-2 
9248 IF<JAND2I=BTHENYSY+4 
9250 IFCJAND4)= 
9268 IF<(JANDSI=BTHENX=K+4 
9278 GOSUBY6H8 
92808 IFX<OTHENX=255:POKEV+i6,0:60709138 
9285 IFY<A8TNEN 8 
3298 IFX>LOOTHENY=188 
9295 IFYDZ28THENY=228 
93360 POKEV,X:POKEU+1,Y: J=PEEK(56320) ! 
9310 G0OT09236 
9488 PRINT'ELLEN SIE HABEN LEVEL 2 ERREICHT" 
9445 FORI=1T03588 :NEXT 
9458 RETURN 
3600 REM WIND 
93610 F=INT{RND(H)#6):2=2-1 
9628 Q=@+1:1FQDASTHENF=-F 
9630 IFQ=38THENF=ABS(F) =d 
9635 PRINT’ELEE COUNTDOHN : "ZU a" 
93636 IFZ<1TNENGOSUB7688:60T09186 

X=X+F:RETURN 
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18888 
18018 
18026 
10636 
18048 
110080 
11186 
411116 
11120 
11138 
11148 
11999 
15080 
150803 
45095 
15087 
15008 
15009 
15018 
180606 
18005 
18618 
200868 
20010 
208026 
20030 
20048 
208058 
20860 
29678 
20080 
206098 
20168 
20110 
20126 
20125 
29136 
20148 
20156 
20160 
29206 
20216 
20220 


26238 





ö 
26250 
26260 
28300 
20310 
20320 
20330 
20340 
21006 
21061 
21002 
21026 
21030 
21048 
21050 
21060 
21062 
21065 
21067 
21076 
21080 
21898 
21188 
Z1120 
21260 
21216 
21228 
21230 
21240 
21245 
21250 
21300 
21316 
21358 
21355 
21356 
21368 
21400 
21416 
21450 
21455 
21456 
21460 

1590 
21665 
21697 
21609 
226066 
RENDY 





POKEV+38,0:C=PEEK (V+38) 

IFC<ATHENRRETURN 

IFINT<C/2)<IC/2THENGOSUB7686 :X=X+15:RETURN 
IFC=180RC=340RC=660RC=13BTHENP=P+108 

RETURN 

POKEV+21,0 

FORI1=81032:D=6<(1):POKE832+1,D:NEXT 

FORI=331062 :POKE832+1,0:NEXT 

FOR1=331065:D=6<1I):POKE8B96+1-33,D:NEXT 

FORI=33T062 :POKE896+1,8:NEXT 

POKE20-41,13:POKE2042,14 

60107888 

POKES53281,0: FORI=1T024: PRINTSSESERERTERSSRERTSISTERÜSSHTRRSRSENENTRSESNRTENEN 3 
NEXT 

PRINT"ELLLLPE":FORI=ATOS 

PRINT" ";:NEXT:REM 48 LEERSTELLEN 
PRINT'ELLLPSRPRPPERIPRBBL] L EU EL 3 m" 

NACH RECHTS FLIEGEN m" 








POKES3281,8 
IFY<145THENY=150::RETURN 
IFYD=145THENY=128:RETURN 
DATA 8,248,0 

DATA 8,246,0,8,240,0 

DATA 8,248,6,127,255,248 
DATA 255,255,252,255,255,252 
DATn 255,255,248,127,255,248 
DATAB,0,0,0,8,0,0,0,0,0,0,0,0,0,0,0,8,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,8, 
DATA 8,15,252,48,12,204 

DATA 15,60,204,15,63,252 


DATA 15,63,252,170,176,170 

DATA 170,170,176,42,170,170 

DATA 10,170,170 
DATAB,6,0,0,0,6,0,6,0,8,0,0,0,0,6,0,6,0,0,0,0,0,8,0,0,0,0,0,80,0,0,0,0,0,8, 
DATAL92,8,0,192,0,0,192,6,0,192,0,0,192,0,0 


FORI=0T065:RERDD:GCII=D: NEXT 

FORI=0T062 :RERDD :POKE8B32+1,D: NEXT 

FORI=OT062 -READD :POKE896+1,D:NEXT 

FORI=0TOA-4:RENDD:POKEIEB+I,D: NEXT 

FORI=15T062:POKE9608+1,8:NEXT 

GOSUB6080:: POKES3288,6: POKES3281,6:PRINT''U'":L=4:POKEY+16,8:POKEV+38,8 
PRINT"ELLLELLER & 
FOR TOiO: PRINT 
PR 
PRINTEA"TABCISPI'LLR 
PRINTTAB< 33) (LRLRPPELPRIOHMS/NM" ; 
POKEV+29,192:POKEV+48,0:POKEU+41,1:POKEV+42,1:POKEV+43,0:POKEU+44,8 
POKEV+45,11:POKE2041,15:POKE2042,15:POKE2043,15:POKE2044, 14: POKE2045,14 
POKE2946,13: POKE2047,13:POKEV+46, 11: POKEV+27,8:POKEV+28, 49 
POKEV+21,255:POKEV+9,13-4:POKEUV+11,154:POKEV+13,195: POKEV+15, 225 
POKEU+8,122:POKEN+12,210:POKEU+14,70:X5=122:X6=6:X7=210:X8=708 

REM seems 

REM * LEVEL 4 * 

REM meet 

J=PEEK (56320) 

IFCJANDA> 
IFCIAND2) 
IFCIAND4) 
IFXJANDSI 
IFS=ATHEN, 
IFCJANDIGEI=OTHENGUSUB2H80 
IFS=ATHENGOSUB2508 
IFY>A141THENGOSUB7609: Y=88 
IFX<20THEN 
IFY<ZOTHEN 
IFXI2S5THENX=255 
"POKEV,X:POKEUrA,Y 
KI=R5-2:X6=X6-2:%X7=X7r2:X8=X8+2 
IFXS<eTHENKS 
IFX6<OTHENX6=240 

IFX7)230THENX7=0 

IFXGI236THENXE=8 

60SUB19608 
POKEV+3,%X5:POKEV+10,%6:POKEU+12,%X7:POKEU+14,X8 
IFYS3>VYTHEN21350 

73=156:%3=X5:POKEU+4,X3 = 
IFY3<OTHEN21310 

IFX3CX+19THENK3=X3+3 

IFX3DX+1ETHENRI=2I-3 

Y2=43-7:PGKEV+S,V3:POKEU+4,X3 

IFY4>YTHEN21456 

v4=150:X4=%6:POKEU+6,X4 

IFY4<OTHEN21410 

IFXACXH 10 THENX4=X4+3 

IFX4DX+LOTHENX4=X4-3 

Y4=Y4-7:POKEU+7,Y4:POKEV+6,X4 

GOSUB18660 .H=INTCCA41-Y) 79 

PRINT"BIM"TABCIS 
PRINT"EIa"TABC3S I ERERROTEORPLERERN ;M 
PRINTTABC33I "ELLI"; P 

601021088 












NEXT 





wi; 
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! REM # <C) BY THOMAS MELLENHOFER 784 * 
I.A. WON DIAMOND SOFTWARE # 
Ari EuBe.eR. SOTO2SOB 











Ü »8:8=180:1=3 

81=5 3272: POKESI+12,5%16+16: POKESI+H13,SK16H15: POKESI+24, 15:POKESI+11,8 

2 FÜKESI+F, 250: FÜKESI+1G,3 
Bu 









oASILS 
HHHHHHHHHR 


ZEIT #:## MIN. PUNKTE HH 


























ne wi 
Fa EM Oo 
N 








PRINT" A ;!POKE2033, 166: POKESE295, 8 


166 FOKE19.6:UAIT19B, 1: T19="660600" :GOTO308 
3245 


:POKEYO4+A. B: NEXT 
:POKES3Z+A, B: NEXT, 
:POKE1ES20+A, B: NET 







:POKEZSIKE4HA, B:NEAT 
:POKEZSUME4HF. B: NEXT 
:POKEZ243#64+A, EB’ NERT 
:POKEZ243#E4+A, B:NEAT 
:POKE247#64+A, BE NH 
REALDB : POKE24E#64+A. B:NEX 
PÜKEZA4B, IL: il POKE2042, 21: POKEVY+37,3:PÜKEV+38, 15 
3 POKEV+ZE, 187: VI=25 
POKEV+39.1 TPOREwrd4, 5:POKEY. 19: POKEY+1,263:POKEV+16, 139: POKEV+11.165 
FOKEY+41, 0: POKEY+4, 188: FOKEY+S. 162: XA=180 
POKE2843, 13: POKEV+42, 5: FOKEV+5, 155: POKEV+7 , 167 
FOKEZU44 , 13: POKEV+43. 5: POKEY+B., 30: POKEY+9, 160 
PÜKEZ@41 , 254 :POKEY+48. 13: PÜKEW+2, 198: POKEY+3, 201 
FÜKEZUgE FOKEY+45,9: FOKEV+12,24:POKEV+13, 181 
FOKE2047 : 13: POKEY+46, 5: POKE'Y+14, 190: POKEY+15,164 
POKEY+16., 17: POKEY+23. 232: FÜKEV+29, 232 
25% ELlEL 

































IA" ;MIDSCTIS.4, 195 "2" ;RIGHTECTIS, 29; "@" 
?>=SGBTHENFOKE133.9:WAIT198,1:60T03308 

IFT1/29=1NTCT17’26> THENGUSUBAGO 

IFEL=1ANDTI1Z2=INTÄTIFIZITHENP=P-2 RAS a NE SZr NERLDOSUBICH 

IF _INTERNDCLDKZ+LD=1 AND! a THENGOSUB 5: 

I 


















#3: POKEY+4 KA 
A=ß:V1=251 








SA=8:Y1=251 
T4ANDYI RR Sen: Pal Ps: GOSUB458 
Rat: GOTO338 
Y+12,20 
1) 








Is 





























SAND C JORNDILE 


Hi 1234 :GUSUB450 : GUSUBSEB 
ZANDCJOANDISI=OANDK=1THEN! ü B 









GOTISH 

IF T>BTHENT=ST-1 
BR INT "7 HOfBISIeIS[eTSTBLAIRTRTKTALDIEIRTETRTSTELED BD 
EL=1:FRINT"A ®" RETURN 





3 :ONTGOTO4@4, 465, 406. 407 ,488,459, 410,411 





DASIS 


für den Commodore 64 


































































































:GOSUB458: GOSUP4GR : 5OSUBSHO 













































































Der kleine unerschrockene Hadschi 
Abul Esla ben Farrad - befindet sich 
auf dem Weg durch die Wüste nach 
Wadi Susa. Unterwegs ist er den krie- 
gerischen Tuaregs in die Hände gefal- 
len, konnte sich jedoch im Morgen- 
grauen befreien und befindet sich seit- 
dem auf der Flucht. 

Nun ist es Mittag, und obwohl er nur 
fünf Minuten Vorsprung vor seinen 
Verfolgern hat, sieht ersich gezwungen, 
sich und seinem völlig erschöpften Ka- 
mel eine kleine Ruhepause zu gönnen. 
Zum Glück bemerkt er am Horizont 
eine lebensspendende Oase. Nun gilt es, 
den Vorsprung zu nutzen und mög- 
lichst viel Wasser mit einem Kübel vom 
Brunnen bis zum Trog seines Reittieres 
zu tragen. Doch muß er nicht nurgegen 
die Zeit kämpfen; auch ein furchterre- 
gend aussehender Affe will ihm das Le- 
ben erschweren, indem er ihn durch ge- 
schicktes Schwingen zu Fall zu bringen 
versucht und so des Kübelinhaltes 
beraubt. 

Die Steuerung erfolgt über Joystick an 
Port I 


Das Füllen und Entleeren des Kübels 
geschieht durch Drücken der "”Fire- 
Taste” und wird optisch und aku- 
stisch angezeigt. 


Ein kleiner Tip: 

Lassen Sie Ihr Kamel nicht ungeduldig 
werden, da es sonst zu blöken beginnt 
(und das gibt Punkteabzug!). 
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PRINT" Am" 
PRINT" m 
& PRINT" Re" 


"RETURN 
:RETURH 
:RETURH 


:RETURN 


PRINT"! 
PRINT" ":RETI 

© PRINT" SIRIlelemEn 
PRINT MOOOOB 


ee" 
ma"; PP," RETURN 

FOKESI+11,65 

S AT:POKESI+11,8:RETURN 
253: FOFEY+12, 28: FORMD=1T01758: NEXT : POKEZ048 , 252: POKEV +12, 24: RETURN 

ES FRNDR A127 THEN 548 
IF#AFZOSAHDSAZZ1S THEN 358 
OH INTERNDE15#SHLGOTO 549,550, 559.570,560, 578, 369,570 
RETURN 
FÜ :Y1=258: RETURN 


Bann, 243 POkena YA- Sr Pokeuas. ie: 


43: RETURN 


251:POKEY+4, 3 
2,251: POKEY +4, 


3: POKEY+5, 152: RETURN 
+3: FOKEY+5, 1852: RETURN 


251 THENRETURN 
Z1SAHDHA>LZETHENON INTERNDELDKZ+HL GOTIS2B, 638 


ESTHENKASKA-3:POKEY+4S HA 
AA+3: PÜKEY +4 AA 


PRI ur" SLTIRITEN © RETURN 

DATA 4. 63, 4. 5 127, 85, 28. 66. 4. 68, 12, 4 
DATASsS. 12, 4,68, 12. 4.68, 18, 4,68 
DATA 12, 4. 4. 12, 4: 4, 12, 4, 4, 12, 4, 4 
DATA 46; 4, 6, 140. 164. ©, 12, 5, 10, 146. 168, 18 
DATA 176. 168. 10, 178. 168, 18. 170, 168, 10, 178, 168; 2 
DATA 176, 168. 8, 42. 8 
DATA a, 8. 5. 10. 0, 5. 10, 120, 0, 5 168, 166 
IATA 2. leo. 9, 160. 8, 2. 170, 1: 
DATA 1: 18, 25, 186. 40, 4, : 2, 20, 48, 32 
DATA 5: 8 28,090 5 DD E 
DATA : 5. 4,8, 6. 5 8. 8 5% 

a DATA 21. 9. 9. 1, 0 
DATA 8. 5. 170. 6, ©, 176, 0, 6, 154, 8 
DATA & 3, 1. 38, 8. 1. 26. 8. 8 
IATA £ 249, 48, 3: 252. 255. 3, 253, 63, 8 

a DATA 246, 255. 10. 245, 48. 42, 168, 8, 42, 168. a. 42 
IATA 42 4. 4, 42, 20. 42: 19. 16. 40, 0. BD, Sa 
DATA 

a DATA u, 8 . 178, 9. a. 166, 8 
DATA . : 1. 20, Eh 

aa DATA : 15, 6 2 132, 252, 127, 192, 255 

a DATA a » 15: 53. 168. 8, 42, 168, 1 
DATA 53. 160. 188: 8. 8. 4, 5 
DATA 
IATA 4 
DATA ’ 
E 7, 255, 248, 31 

. 192, 35, 124. 192. 35 

2: 8, 192, 3 


1. 224, W, 3, 224, 8 
2948, 6, 29 
192, 63. 255, 224, 
246, 244, 155, 239, 
24. 6: 6, 28 


26: 0, 1, 165. 128 
2 8, 14, 259, 112, 13 
12,. 255, 48. 12, 255. das 1240126, 48, 18 
14, 231. 112, 13, 221, 176, 1, 247, 128, 0 
28, 8. 8, 54: 8. 8, 34, 6, 0 


5, 12. m 24, 12 
} Pr: 15, 165. 248, 127 
54. 231 . 225. 255, B, 193, 254, 8, 193 
5, 225, 248, 8, 195, 248, 8, 7, 248. 8, 15 
13. 68, 0. 6, 112. 8, 2. 192%, 0,6 
4, 54, 8 
8. 6. 112. 6. 14. 36. 55 96. 24: 6 
A 120, 50, 20, 1265, 36. 254, 155. 252, 15 
213, 246, 1, 231. 128, 1. 255. 128, 8. 255. 6. 8 
A 255. 8: 5% 126, 8, 8, 255. 9 5, 221. 8, 1 
A 231, 128, 1, 128, 6, 119, 8, 8. 20. 8. 5 


ATA 48, 0. 9. 5 2. 6 48, 24: 8 
Ak \ 9, Bla 165, 1240, 7 
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DATA 219, 254, 8, 231, 127. 
DATA 62, 121: 9, 15: 125. m, | 
DATA E0, 240. ©, 69, 240. 0, 
DATA 2, 36, 
a9 DATA 9: 8: 0: 0, 0, 
DATA 9. 0, 0. 0, BD 0 
DATA 9. 0. 0, 0, 0 0! 
DATA 0, 9, a, 168, 8, 
DATA ER, 168, 149, 254. 169. 149, 
a DATA 234, 161, 4. 58. 
560 DATA ©. ©. Mm. © 
DATA 3, 4,48, 
DATA 74. 86, 16 
DATA d2, 188, 21, 
DATA 178, @d, 1, 
© DATA dd. D; @; 
REM NEUE ZEICHEN 
DATAL.233, 131.1. 1,1811: 1,1 
DATR2, 31, 32,64, 127, 299, 258, 299, 299 











DaTHR 
DATRa, 1 
122.224.249, 242.2 
17.17,31,3 Ehen 
„22,73,127.127 „E 
64,192 De 132.8 


Wu wen“ 


1 
3.5 


DATAIS, 123, 126.38 
a DATA1B, 248, 247,2 
DATALY. 15,23 
DATA18, 255, 126 
DATA13.21.15. 
2209 DATA28,2553,25 
z21a DATAZ1.25: > 
224.192,0,6 
Bee FOKEL.PEEKCIDAHNDZS1 
3 45+13 :NE#T 
5) POREI PER »ard Po E 334 OR 
POKES3272. (PEEK.(S3272)AND24M)ORLZ: RETURN 
BERDD) IFA=- 1 THENRETUFRN 


NE 
ce Evaz1 „a: POKEZ 040 ‚L: 1: FOKEW+LE.M 
7,147 :POKEW+L. 114 POKEY+Z ‚d: PRINT" : 
PRINT" SgrIetetetelate] Am 
PRINT" ’ 
9 FRIHT" 

PRINT" 

PRINT" 

PRIHT" 

PRINT" 

FRINT" 

PRINT" ARE 1 : 

FORGH=1 7102998 : NEAT : PRINT" 2" !POKEVFZI, ‚8: GOSUB2238 

POKEY+21,8:G05UB21%8 
II 1J 1J 1J 1J 

3aleı \ an BEF CDS BEF COS O BV CR 
2920 
252% 
Fade 


"usammz 


POKESS229.0: PoKESsa 2el,6: PRINT ur 
5 PRIHT" SIRIMTEIRTSIRISTEURISTETRTETRITET I 

PRIHT"AARRRERR RR 

PRINT" TE rn HR 

PRINT" p 

PRIHT"A 

FRIHT" 

PRINT'A wa Er DIAMOND SOFTUARE 
> FRINT"4 

PRIHT"A 

RETURN 


PRINT" " :FORLISOTOKAS-KL) SPRINT; : NE#T: FÜRGH=STOKL :FRINTAFEGHS HEHTGH 
SOSUE31A5:HEAT 
sa FÜRKL=ETOS 

g FRINT"S";:FORITISBTOLS-ELH:FRINT"M" CHEAT: FORGH= ET? PRINTAE GH: NE#TGH 
PRINT" S:NEAT 
FORGH=1 TO20E9:NEAT: FOKEN+21,255:60T018 
POKEY+Z1 9: INPLIT "TISDISTIMIeIRTeIKIRTg A FLER HEUES SPIEL * # ” EINGEBEN ! m ;AT& 
IFAT?="#" THENFÜHEY+21.255:G0T019 
END 





40 CPU ; September 1984 





Eigene Messe 
in Frankfurt: 
4. Commodore 


+ 
Messe 
Frankfurt 


Fachausstellung (CFA) 


Über 20.000 Besucher er- 
wartet der Veranstalter auf 
der vierten ”Internationa- 
len Commodore-Fachaus- 
stellung (CFA)”, die vom 6. 
bis 8. September 1984 
stattfindet. 

Das Unternehmen hat da- 
für die gesamte Halle 1 des 
Frankfurter Messegelän- 
des gemietet. Dort werden 
auf ca. 4.000 Quadrat- 
metern - außer der Herstel- 
lerfirma selbst - rund 120 
Aussteller (1983: ca. 80) ver- 
treten sein, um ihr aktuelles 
Leistungsangebot für Com- 
modore-Anwender vorzu- 
stellen. So vor allem Home- 
computer und System- 
händler, Software-Häuser, 
Zubehör-Produzenten, 
Fachverlage und Fortbil- 
dungs-Institutionen. Aus- 
serdem informiert das Ar- 
beitsamt an einem eigen 
en Stand über die beruf- 
lichen Möglichkeiten in 
der Informationstechnolo- 


gie. 
Die Commodore-Geschäfts- 
leitung sieht Anzeichen da- 
für, daß die Zahl der In- 


teressenten, die Home- 
Computer, wie z.B. C 
64-Modelle, für kommer- 
zielle und semiprofessio- 
nelle Aufgaben nutzen wol- 
len, auf der CFA’84 stark 
zunehmen dürfte. Ent- 


Praktisches 
Kleinzubehör: 
Disketten- 
Verstärker 


Wirksamen Schutz vor 
Schäden am Transportloch 
der Disketten bietet der 
Fortifier von INMAC. 
Denn: Die Fortifier-Ver- 
stärkungsringe verhindern 
Laufwerk-Störungen und 
damit die Zerstörung der 
Diskette, der gespeicherten 
Daten. 

Dieses patentierte Gerät 
aus Aluminium schützt 8”- 
und 5 1/4”-Disketten an ih- 
rer strapaziertesten Stelle. 
Eine präzise Handpresse 
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sprechend breit wird auch 
das Programmangebot für 
derartige Applikationen 
sein. So wird die Ausstel- 
lung durch zwei Haupt- 
schwerpunkte gekennzeich- 
net sein, einmal den Be- 
reich der kommerziellen/ 
professionellen Anwen- 
dung und zweitens den 
Hobby-Bereich. 
Außerdem sei - wie Alwin 
Stumpf, für den Deutsch- 
land-Vertrieb zuständiger 
Geschäftsführer, betont - 
mit einem massiven An- 
stiegjugendlicher Besucher 
zu rechnen. Für ”Freaks” 
gibt es wiederum eine spe- 
zielle Hard- und Software- 
Börse, auf der Commo- 
dore-Rechner und -Pro- 
gramme verkauft oder 
getauscht werden können. 
Mit diesem Angebot dürfte 
der Branchen-Primus der 
einzige Hersteller sein, der 
mit einer derartigen Veran- 
staltung aufwarten kann. 
Die CFA wird in diesem 
Jahr noch stärker als früher 
durch Unterhaltung aufge- 
lockert. So zum Beispiel mit 
einer Dauershow des Mo- 
derators Martin Hecht vom 
Hessischen Rundfunk 
Frankfurt und durch eine 
großzügig angelegte ”Spiel- 
nische”. 


sorgt automatisch für ge- 
naue Zentrierung der Ver- 
stärkungsringe. Einfacher 
läßt sich die Lebensdauer 
und Zuverlässigkeit auch 
preiswerter Disketten nicht 
erhöhen. 

Komplett mit 20 Verstär- 
kungsringen kostet das 
Fortifier-Disketten-Verstär- 
kungs-Set (Gewicht Ikg) 
für 8"- und 5 1/4”-Disketten 
netto DM 39,-. Der Preis für 
zusätzliche Verstär- 
kungsringe (50-Stück-Pak- 
kung) für 8”- und 5 1/4”- 
Den beträgt netto DM 
29,-; 


(30-tägiges Rückgaberecht; 
Lieferung innerhalb 24 
Stunden) 
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NEU: Kaypro 4 mit Uhr 


und Kalender, 


grafikfähiger _Antireflex- 
Bildschirm, zwei RS232C/ 
V24-Schnittstellen, einge- 
bauter Ventilator und Slime- 
line-Disketten-Laufwerke 


Deutliche Verbesserungen 
gelangen Kaypro am Kay- 
pro.4, dem mittleren Mo- 
dell ihrer Baureihe tragba- 
rer Personal Computer. Bei 
gleichbleibender Preisem- 
pfehlung (6.448 DM incl. 
MwSt) wird dieser KAY- 
PRO 4/84 genannte Com- 
puter ab sofort mit einem 
grafikfähigen Antireflex- 
Bildschirm ausgeliefert. Er 
ermöglicht Business-Gra- 
fik im 100 x 160 Punkte- 
Raster, inverse Schaltung 
(dunkle Zeichen aufhellem 
Grund), reduzierte Leucht- 
stärke, Blinken und pro- 
grammunabhängige Un- 
terstreichungen. Zudem 
kann der Cursor aus- und 
eingeschaltet werden. Mit 
der im Lieferumfang ent- 
haltenen Software-Unter- 
stützung kann die im Kay- 
pro 4/84 eingebaute, soge- 
nannte Echtzeituhr akti- 
viert werden. Sie blendet 
Datum, Wochentag und 
Uhrzeit bis auf die 1/100 
Sekunde genau in den Bild- 
schirm ein. 

Anstelle der bisher einge- 
bauten Standard-Disket- 
ten-Laufwerke verwendet 
Kaypro im Kaypro 4/84 
nun die modernen Slim- 
line-Laufwerke mit nur 
halber Bauhöhe. Die bis- 
herigen Anschlußmöglich- 


keiten für Peripherie-Ge- 
räte (eine  Centronics- 
Schnittstelle für Parallel- 
Drucker und eine RS232C/ 
V24-Schnittstelle für seriel- 
le Drucker) wurden ergänzt 
um eine weitere RS232C/ 
V24-Schnittstelle (z.B. zum 
Anschluß eines . Akustik- 
Kopplers). Außerdem wird 
in den Kaypro 4/84 ein 
Ventilator eingebaut. 

Der Kaypro 4/84 besitzt ei- 
nen Arbeitsspeicher von 64 
Kbyte und zwei Speicher/ 
Lese-Einheiten (Lauf- 
werke) für Disketten von je 
394 Kbyte (entsprechend 
etwa 200 Schreibmaschi- 
nenseiten Text) Speicher- 
kapazität als Massen- 
speicher. Die Bildschirm- 
Dialoge des Betriebssy- 
stems des Kaypro 4/84 sind 
wie die des Kaypro 2 und 
des KAYPRO 10 in die 
deutsche Sprache über- 
setzt, ebenso die am mei- 
sten benötigten Dienstpro- 
gramme, die die Arbeit mit 
dem Computer erleichtern. 
Das im Lieferumfang (und 
Preis) enthaltene, umfang- 
reiche Software-Paket um- 
faßt Programme für die 
Textverarbeitung (Word- 
Star und das Korrekturpro- 
gramm WortPlus, eine 
Datenbank-/Adressverwal- 
tung dBase II, den Mix- 
Druck von Texten mit 
Adressen (Mailmerge), für 
die Kalkulationen Su- 
perCalc und für die Pro- 
grammierung Basic). 
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In Fortentwicklung des 
deutschsprachigen Soft- 
wareangebots bringt Atari 
Ende September drei neue 
deutsche Programme .aus 
dem Bereich ”Heim und 
Beruf” auf den Markt. 

Da ist zunächst einmal 


SynFile+(Dateiverwaltung) 
Mit diesem Programm 
können Sie nach Ihren 
persönlichen Notwen- 
digkeiten Daten verwalten, 
wie z.B: Telefonlisten, 
Adressenverwaltung oder 
anderes. 

Die eingespeicherten Da- 
ten können jederzeit auf 
den neuesten Stand ge- 
bracht. werden. Einfache 
und schrittweise aufge- 
baute Befehle lassen Sie 
Ihre Datei ganz nach indi- 
viduellen Vorstellungen ge- 
stalten, Informationen ord- 
nen und Fehlermeldungen 
bei falscher Handhabung 
kurzfristig korrigieren. 
Oder als zweites Programm: 


SynCalc 

Dieses menügesteuerte Ta- 
bellenprogramm macht es 
auch Anfängern leicht, 
Kalkulationen nach eige- 
nen Vorstellungen durch- 
zuführen, eingegebene For- 
meln und Kalkulationen 
jederzeitaufzurufen undzu 
ändern. BeiÄnderungen ei- 
ner Position überarbeitet 
SynCalc automatisch alle 
wichtigen Formeln; Um- 
stellungen der Spalten, 
Reihen oder des gesamten 
Formulars sind möglich. 
SynCalc erlaubt darüber 
hinaus die Kombination 
verschiedener Dateien und 
enthält Mathematik-, Sta- 
tistik- und Finanz-Funk- 
tionen. Daten des SynCalc- 
Programmes sind übertrag- 
bar in die anderen Kom- 
ponenten des Syn-Systems, 
sowie den ”Atari-Schrei- 
ber” 

und als letztes 


SynTrend (mit SynGraph 
und SynStat) 


Benutzen Sie SynGraph, 
um eindeutig bezeichnete 
und in der Darstellung 
deutlich unterscheidbare 
Farbgrafik herzustellen. 
Kurven, Balken sowie 
Kreisdiagramm und Punkt- 
verteilung stehen zur Aus- 
wahl und machen die ein- 
gegebenen Daten auf die 
bestmögliche Art grafisch 
sichtbar. 

Man arbeitet mit Syn- 
Graph in zwei Schritten. Im 
ersten werden unterschied- 
liche Daten eingegeben 
und über Verknüpfung zu- 
einander bestimmt. Im 
zweiten Schritt wird eine 
der vier grafischen Darstel- 
lungsmöglichkeiten ge- 
wählt. Befehlsmenüs im 
oberen und unteren Be- 
reich des Bildschirms sind 
behilflich bei der Herstel- 
lung der Grafikmöglich- 
keiten. 

SynStat ist ein leicht zu 
handhabendes Statistik- 
programm für die schnelle 
und leichte Analyse von 














rechnerischen Trends für 
Heim, Geschäft und Schu- 
e 


Auch SynStat ist menübe- 
zogen mit vielen Anwen- 
dungen. Zu den Mög- 
lichkeiten von Kalkulation 
und Vorausplanung ist es 
hervorragend zur Handha- 
bung und Speicherung von 
Daten geeignet. Bei dem 
aus zwei Teilen bestehen- 
den Programm benutzen 
Sie den ersten Abschnitt, 
um Ihre Daten anzulegen, 
die entsprechend Ihrer An- 
weisung analysiert werden 
sollen. Der zweite Bereich 
ermöglicht Ihnen die Vor- 
gabe, auf welche Art und 
Weise bestehende oder ein- 
gegebene Daten unterein- 
ander analysiert werden 
sollen. Für Statistiker be- 
sonders interessant: Diese 
Analysen können auch in 
einfacher oder mehrfacher 
Regression stattfinden. 


Hewlett-Packard stellt neues Bildschirm-Terminal vor 


Hewlett-Packard kommt 
mit einem neuen kom- 
pakten 
minal auf den Markt. Be- 
sonders hervorzuheben bei 
dieser neuen Generation 
von Terminals ist die aus- 
geprägte Benutzerfreund- 
lichkeit. Auch der Preis 
liegt erheblich unter dem 
des Vorgängermodells. 
Das neue Terminal HP 
2392A ist mit dem im 
Blockmodus arbeitenden 
Bildschirm-Terminal HP 
2622A in funktioneller Hin- 
sicht praktisch identisch. 
Aufgrund seiner verbes- 
serten ergonomischen Ei- 
genschaften ersetztdas Ter- 
minal HP 2392A das Sicht- 
gerät HP 2622A. 

Der niedrige Preis wurde 
nach Angaben von HP 
durch die Verwendung von 
speziellen VLSI-Schaltkreis 
und eine Reduzierung der 
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Bildschirm-Ter- 


Anzahl der Einzelkompo- 
nenten möglich. Beide 
Faktoren tragen gleich- 
zeitig zu erhöhter Zuverläs- 
sigkeit bei. Die Entwick- 
lung dieser Schaltkreise er- 
folge im HP-Werk in 
Grenoble, Frankreich. 


Wir haben uns das Terminal 
ein wenig näher ange- 
schaut: 

Der Bildschirm des Termi- 
nals HP 2392A mißt volle 
12 Zoll (30 cm) in der Dia- 
gonale. Dennoch bean- 
sprucht die Bildschirmein- 
heit am Arbeitsplatz nur 
eine Fläche von 32 mal 36 
Zentimeter. Die eingebaute 
Kipp-p und Drehvor- 
richtung erlaubt eine indi- 
viduelle Einstellung des 
Blickwinkels. Die flache, 
frei bewegliche Tastatur 
liegt eben auf der Arbeits- 
fläche auf oder kann ge- 
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kippt werden. Das Gerät.ar- 
beitet ohne Ventilatoren 
und damit praktisch ge- 
räuschlos. 

Die Zeichen werden auf 
dem Bildschirm mit einer 7 
mal 11 Punktmatrix in ei- 
nem 9 x 14 Punkt-Zeichen- 
element mit Halbpunktver- 
schiebung dargestellt. Ein 
übergangsloser Bilddurch- 
lauf (scrolling) ermöglicht 
das kontinuierliche Be- 


a DD mM. 











trachten von bis zu 4 
Textseiten. Wahlweise kann 
der Bildschirmspeicher auf 
8 Seiten erweitert werden. 
Anwendungsbereiche: 

Das Terminal HP 2392A ist 
gedacht für dialogorientierte 
Anwendungen wie Daten- 
erfassung, für Programm- 
entwicklung und andere 
Anwendungen mit der 
kommerziellen Rechnerfa- 
milie HP 3000, den Echt- 


D m 


zeitsystemen der Familie 
HP 1000 und den techni- 
schen Computersystemen 
der Familie HP 9000. Das 
Terminal kann wahlweise 
auch eine Teilmenge des 
ANSI-Standards X3.64 un- 
terstützen. Damit läßt sich 
das neue Sichtgerät auch 
an Rechner anderer Her- 
steller anschließen. 

17 verschiedene sprachspe- 
zifische Tastaturen stehen 


bpb a DD 8. 


Für einen überaus großen Kreis von Heimcomputer-Anwendern, 
aber auch für professionelle Anwender, interessant und 


nützlich: 


Cassette Pulse Regenerator CPR 


Das Gerät wurde geschaf- 
fen, um die bisher recht un- 
sichere Speicherung und 
Wiedergabe von Program- 
men auf handelsüblichen 
Audiocassetten sicherer 
und gestörte Programme 
lesbar zu machen. 

Wie hinreichend bekannt 
ist, werden die vom Rech- 
ner gelieferten Impulse 
durch die Cassettenauf- 
zeichnung in der Form dra- 
stisch verzerrt, zum Bei- 
spiel durch falsch einge- 
stellte Vormagnetisierung, 
falsche Vorentzerrung, 
Übersteuerung, Brummen, 
Rauschen usw. Wersich die 
vom Recorder zurückgelie- 
ferten Impulse, insbeson- 
dere bei Billiggeräten, an- 
sieht, wundert sich nicht 
mehr, daß so viele Benutzer 
mit diesem Verfahren Pro- 
bleme haben. Wird gar für 
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die Wiedergabe ein anderes 
Gerät benutzt als für die 
Aufnahme oder eine Di- 
rektüberspielung von Re- 
corder zu Recorder vorge- 
nommen, geht meist nichts 
mehr. 

Der CPR schafft Abhilfe. 
Er wurde so konzipiert, daß 
er sich für alle Rechner eig- 
net. Dies war möglich aus 
der Erkenntnis heraus, daß 
die Information bei jedem 
der benutzten Codierver- 
fahren letztendlich nur in 
den Nulldurchgängen ver- 
steckt ist. Der CPR führt 
deshalb alle Signale auf die 
Rechteckform zurück, die 
vom Rechner am besten zu 
verarbeitende Signalform. 
Wir haben ihn getestet: 
Daß das Signal wirklich 
vollständig regeneriert 
wird, zeigen Kassetten- 
überspielungen von Recor- 


der zu Recorder mit Hilfe 
der CPR. Auch nach der 20. 
Kopie von Kopie trat kein 
Fehler auf. Danach haben 
wir den Versuch abge- 
brochen, weil uns die Zeit 
zu schade war.... 

Ebenso erfolgreich waren 
Aufnahmen vom Laut- 
sprecher über das im 
Recorder eingebaute Mi- 
crofon. Die anschließende 
Eingabe in den Rechner» 
über das CPR war fehler- 
frei. Dabei muß natürlich 
verlangt. werden, daß 
während der Aufnahme: 
keine allzu lauten Geräu- 
sche gemacht werden. 
Preise: DM 49,90, als 
Bausatz DM 39,90 jeweils 
incl. MwSt, Versand per 
Nachnahme. (Zu erhalten 
bei INTERKOM in Beins- 
hagen) 
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zur Verfügung, das Bild- 
schirm-Terminal HP 2392A 
kann somit lokalen Anfor- 
derungen problemlos ange- 
paßt werden. Mit dem inte- 
grierten Format-Modus, ei- 
nem Satz von 64 Zeichen 
zum Zeichnen von Linien 
und den lokalen Editierta- 
sten erleichtert das Termi- 
nal die Datenerfassung bei 
gleichzeitiger Entlastung 
des Systems. 


a 0 m 


Naturwissen- 
schaften mit dem 
Computer pauken 


Sicher ist es kein Zufall, 
daß gerade Atari sich um ei- 
nen sinnvollen Einsatz von 
Computern in Kinderhand 
bemüht. Wer Physik, Che- 
mie oder Biologie leichter 
verstehen will oder gerne 
experimentiert, lernt jetzt 
seinen Computer von einer 
ganz neuen Seite kennen. 
”ATARI LABOR” ist eine 
Serie von Programmen, 
von denen das erstesich mit 
dem Thema Temperatur- 
messung befaßt. Das beige- 
fügte Handbuch vermittelt 
zunächst einmal Grund-. 
wissen darüber, was Tem- 
peratur eigentlich ist, in 
welchem Zusammenhang 
Moleküle und Temperatur 
stehen, wie sich Moleküle 
in verschiedenen Körpern 
bewegen etc. Zahlreiche 
Versuchsanordnungen sind 
vorgegeben. Die Ergeb- 
nisse der Experimente wer- 
den in ein Arbeitsbuch ein- 
getragen, um so Kinder 
spielerisch in ein wissen- 
schaftliche Arbeitsmetho- 
den einzuführen. 

Die Grundausstattung (La- 
bor-Interface) ist mit einem 
Steckmodul für Tem- 
peraturmessung ausgestat- 
tet, dem noch weitere folgen 
werden für die Bereiche 
Optik, Akustik, Biologie, 
Chemie etc. 

Das ”ATARI LABOR T”’ 
(Temperaturmessung) ko- 
stet DM 249,- und ist eben- 
so wie das ATARI LA- 
BOR II über Lichtmessung 
(DM 149,-) im Oktober 
erhältlich. 
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Kaypro erweitert Software-Paket 


Ab sofort liefert Kaypro 
Deutschland GmbH die 
Modelle Kaypro4und Kay- 
pro 10 ihrer Baureihe trag- 
barer Personal Computer 
mit erweiterter Software 
und komplett in die deut- 
sche Sprache übersetzten 
Dienstprogrammen aus. 

Das mit WordStar, dem 
WortPlus, dBase II, Su- 
perCalce und Basic ohne- 
hin schon sehr umfang- 
reiche Software-Paket wird 
ergänzt um das Programm 
MailMerge, mit dem die 
Anfertigung von mehreren 
Drucken eines Briefes ge- 
nauso möglich ist wie die 
Verknüpfung von Briefen 
und Texten mit unter- 
schiedlichen Adressen. 


Kaypro hat dabei darauf 
Wert gelegt, daß dieses 
Mixdruck-Programm außer 
mit dem Textverarbeitungs- 
Programm WordStar auch 
mit dem für die Adressen- 
speicherung verwendbaren 
Datenbank-Programm 

dBase II kombinierbar ist. 
Die unverbindlichen Preis- 
empfehlungen für die 
Kaypro-Computer bleiben 
trotz dieser Leistungsver- 
besserung gleich: Der 
Richtpreis (incl. MwSt) des 
Kaypro 2 beträgt 5.448 DM, 
der des Kaypro 4 noch im- 
mer 6.448 DM und der des 
Kaypro 10 DM 10.098. 

Die Dienstprogramme des 
Kaypro 4 und 10 wurden so 
überarbeitet, daß sie die 


Computertage ’84 


In verschiedenen Städten 
der Bundesrepublik fanden 
in diesem Jahr ”Com- 
putertage” statt, die alle un- 
ter einem einzigen PR-Etat 
verwaltet wurden. 

Die Handelsagentur Schol- 
ten aus dem nordrhein- 
westfälischen Straelen ver- 
sucht, mit dieser zeitge- 
mäßen Form der Verkaufs- 
förderung einen "direkten 
Weg zum Anwender” zu 
finden. 

Die bisherigen Termine 
(u.a. Oberhausen 28. April 
bis 01. Mai, 

Bochum 22. April bis 24. 
Mai, 

Mönchengladbach 29. April 
bis 31. Mai 

und Koblenz 31. Mai bis 03. 
Juni scheinen die Qualität 
des Konzepts zu bestätigen. 
Allerdings muß bei Beurtei- 
lung von Resonanz, einer 
Ausstellung in der Öffent- 
lichkeit außer den vom 
Veranstalter zu beeinflus- 
senden Faktoren auch das 
jeweilige gesellschaftliche 
Umfeld herangezogen wer- 
den. 

Und hier wird schnell deut- 
lich, daß selbst mittelmäßig 
koordinierte Messen über- 
durchschnittliche Erfolgs- 
ziffern aufweisen können, 
ganz einfach deshalb, weil 
das Thema ”Computer” 
nebst allem, was irgendwie 
ähnlich strukturiert ist, ge- 
genwärtig einer der Brenn- 
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punkte öffentlichen In- 
teresses ist. 

CPU wäre aber nicht CPU, 
wenn wir uns ausschließ- 
lich mit ”Schnee von ge- 
stern” beschäftigten. 
Vielmehr weisen wir auf 
den nächsten Termin die- 
ser Messe-Serie hin: 
Göttingen, 02. bis 04. 
September ’84 
Kernzielgruppe des Com- 
putertages Göttingen wer- 
den beruflich motivierte In- 
teressenten aus Handwerk, 
Groß- und Einzelhandel 
sowie den freien Berufen 
sein. 

Darüber hinaus sollen aber 
auch Lehrer und private 
Nutzer der EDV ange- 
sprochen werden, die sich 
über Trends und neue 
Technologien auf dem 
breiten Feld der Computer- 
Anwendung informieren 
möchten. Leider steht der 
Heimcomputer hier ein we- 
nigim Abseits: Die PC’sdo- 
minieren gewaltig. Wir fin- 
den aber, daß auch der 
Homecomputer-Freak nicht 
vor der Beschäftigung mit 
den großen” Personal 
Computern zurückschrek- 
ken sollte: Wenn er wissen 
will, was sein Atari, Bit 90, 
Commodore, Dragon, Ep- 
son, Laser, Oric, Sharp oder 
Spectravideo von morgen 
kann, findet er es vielfach 
heute schon bei dem einen 
4 oder anderen PC-Modell. 








nicht fachlich an die engli- 
sche Sprache gebundenen 
Fragen und Antworten des 
Computer-Dialogs in deut- 


scher Sprache darstellen.. 


Damit sind Hilfsmittel, die 
die Arbeit mit dem Com- 
puter erleichtern, für alle 
Kaypro-Benutzer verständ- 
lich. Der mit einem 10- 
Megabyte-Festplattenspei- 
cher ausgestattete Kaypro 
10 startet nach dem Ein- 
schalten des Computers 
automatisch mit einem in- 
formativen deutschen 
Hauptmenü, das dem Be- 
nutzer die Möglichkeitgibt, 
das gewünschte Software- 
Programm im Dialog mit 
Sem Bildschirm aufzuru- 
en. 


Die kleinste 
Auto-Repeat- 
Schaltung für 
den ZX-81 


bringt It. einer Pressemittei- 
lung, die uns Ende Juni er- 
reichte, die Stuttgarter 
Firma Decker & Computer 
heraus. 

Wie der Hersteller uns wis- 
sen ließ, arbeitet die Mini- 
Autorepeat durch Verwen- 
dung eines neuen Oszil- 
lators mit nur. noch einem 
einzigen IC, weshalb die 
Miniaturisierung erst er- 
möglicht wurde. 

Komplett mit einer aus- 
führlichen deutschen An- 
leitung (ca. 23000 Buchsta- 
ben), der vollständigen Ana- 
lyse der Memotech-Tasta- 
tur (kompatibel) sowie Ver- 
sandkostenanteil ist das 
Gerät für DM 15,- ab Lager 
Stuttgart zu haben. 


Wang Deutschland plant 
Produktionsstätte in der 
Bundesrepublik Deutschland 


Wang Deutschland GmbH, 
Tochtergesellschaft der 
Wang Laboratories, Inc., 
Lowell/Mass., plant den 
Bau einer Produktions- 
stätte in der Bundesrepu- 
blik Deutschland. 

Nicht zuletzt die über- 
durchschnittlichen Um- 
sätze von Wang La- 
boratories Inc. im Fiskal- 
jahr 1984 (vom 1. Juli 1983 
bis zum 30 Juni 1984) mit ei- 
ner fast 40 prozentigen Stei- 
gerung auf 2,15 Milliarden 
Dollar (Vorjahr 1,54 Mil- 
liarden Dollar) gaben den 
Ausschlag für Baupläne in 
Deutschland. 

Die Zentrale der Wang 
Deutschland GmbH in 
Frankfurt teilt mit, daß 
man bereits mit verschiede- 
nen Bundesländern ge- 
sprochen und Vorstellun- 





gen der Wang Laboratories 
diskutiert habe. Ausschlag- 
gebend für die Standortent- 
scheidung sind neben wirt- 
schaftlichen Gesichts- 
punkten die Nähe einer 
technischen Hochschule 
und die Infrastruktur. 
Eine Planungsgruppe, die 
sich aus Mitgliedern der 
Geschäftsführung der Wang 
Deutschland und der Wang 
Laboratories Inc., Lowell/ 
Mass., zusammensetzt, wird 
noch in diesem Jahr alle 
eingehenden Standortbe- 
werbungen prüfen undeeine 
entsprechende Empfeh- 
lung aussprechen. 

Eine Entscheidung für ei- 
nen Standort ist entgegen 
anders lautenden Presse- 
meldungen noch nicht ge- 
troffen worden. 
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Maschinensprache. Deutsche Spielanleitung im Pro: 
gramm. Finden Sie in der obersten Reihe den Geheim- 
mechanismus, damit die Urne sichtbar wird! Die er: 
sten Urnen sind problemlos zu finden, aber dann...Zeit 
fallende Steine und Monster sind gegen Sie! 


Bitte benutzen Sie unsere Bestellkarte auf der Um- 

schlagseite. Uber 250 weitere Spiele finden Sie ir 

unserem Katalog. Bitte anfordern bei: wıcosorr 
Christian Widuch 
Nordstraße 22 
3443 Herleshaus 
Tel. 05654/6182 





Nun, was ist eigentlich As- 
sembler? Als Assembler be- 
zeichnet man eine Sprache, 
die im Gegensatz zu den 
höheren Programmier- 
sprachen wie Basic, Pascal 
usw. nicht problemorientiert, 
sondern auf die Maschine 
ausgerichtet ist. 

Das heißt, daß Z80-Assem- 
bler nicht auf jedem Com- 
puter lauffähig ist, sondern 
von Prozessor zu Prozessor 
variiert. Als CPU (Central 
Processing Unit/Zentrale 
Recheneinheit) besitzt der 
Spectrum einen Z80-Prozes- 
sor, der wohl einer der am 
meisten verwendeten Pro- 
zessoren ist. Und deshalb 
wurde dieser Kurs auch als 
Z80-Assembler-Lehrgang ge- 
schrieben. 

Das Wort Assembler steht 
aber auch für ein Programm, 
das Anweisungen in Assem- 
bler in Maschinencode um- 
wandelt. Dieses Programm 
werden wir in Zukunft - um 
Verständigungsschwierigkei- 
ten aus dem Weg zu gehen - 
als "Umwandler"bezeichnen. 
Unterschied zwischen Ma- 
schinencode und Assembler 
Da ein Prozessor nur Zahlen 
versteht, wurde eine Sprache 
entwickelt, die diese Zahlen 
ersetzt... 

z.B. 


ASSENBLER 


_NASCHINEN-CODE 





INC A 
Inc HL 


3C 
23 


[278 
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Was die einzelnen Befehle 
bewirken, werden wir später 
noch besprechen. Jetzt wol- 
len wir uns vor allem mit ei- 
nem speziellen Zahlensy- 
stem beschäftigen. 

Sicher ist Ihnen die Zahl 
”3C” aufgefallen, denn als 
Ziffer gibt es C normaler- 
weise nicht. 













Hexadezimalzahlen 

Als Hexadezimalzahlen be- 
zeichnet man Zahlen, die, 
wie der (griech.-lateinische) 
Name schon sagt, die 16 als 
Basis haben. Das bedeutet, 
daß es sich hier um ein Zah- 
lensystem handelt, bei dem 
es im Gegensatz zum 'nor- 
malen’ Dezimalsystem nicht: 
10, sondern 16 verschiedene 
Ziffern gibt... 



























DEZIMAL 
d 


HEXADEZIMAL 

























DEZIMAL __HEXADEZIMAL 











Als Hilfe dafür, wie es weiter 
geht, soll uns die folgende 
Tabelle dienen: 



































In HEXADEZIMAL- SPALTEN 
REEL EU EERARERD 

Hex = Dec | Hex = Dec | Hex = Dec |Hex = Dec | Hex = Dec 
me. 

0 oo o|o olo 00 

1 100.576 |ı 65.536 | 1 096 | 1 256| ı 16 
2 2.090.182 |2 as.or |2 8.192 |2 sı2| 2 En 
a a1sıme | a ıs6.con |3 12.288013 7sa| 3 “8 
aaa la 22.10 [a 16.00|a  1.02al-a 7) 
s 5.202.000 |s ar. |s zomls 1.201 s oo 
6 6.1.06 ls nz |6 zus |le 1.5266 {D 
7 ma. Ir as |7 2a? mel nz 
a o.0.con |e s2u.208 |e .mele 2.00| 8 128 
9 97.180 |9 sa. |9  a.00|9  2.m0l 9 104 
a 10.085.760 |a 655.200 |a  an.senla 2.560l a 160 
a n.saaae |o 70.06 |0 sole 2.6] o 176 
c2se2.2 |c a0. |c a.s2lc aorlc 192 
0 12.021.088 |o asia |o 5328| 3.228] 0 208 
€ 10.600.068 |e sır.50a |e sr.20le 2.50ule 22 
Fr 15,728.6%0 |F 982.00 |r  sı.mo|r __2.80| Fr 2ao|F 





Zur Anwendung 

Was bedeutet zum Beispiel 
die Zahl "3C’”? 

Wir fangen ganz rechts an 
und nehmen uns das C. 
Dann schauen wir auf der 
Tabelle (ganz rechts) nach 
und sehen - äquivalent zum 
”C” - die Zahl 12. Die 
merken wir uns und kom- 
men zur nächsten Ziffer. 


3616 
161 
16 





Diese zweite Ziffer ist eine 3. 
Wieder schauen wir in un- 
sere Tabelle und können in 
der zweiten Spalte für3 die48 
ablesen. Nun müssen wir 
noch 12 und 48 addieren - 
und erhalten 60. Dezimal 60 
ist also 3C im Hexade- 
zimalsystem. 

Mathematisch formuliert er- 
gibt sich das so: 


—— Basis 
x 160 


1 
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Lassen Sie sich bitte nicht 
durch diese Rechnerei aus 
der Ruhe bringen oder gar 
abschrecken. 

Trotzdem sollte man dies 
verstanden haben: es ist zur 
Programmierung notwendig, 
Und leider müssen wir sogar 
noch ein weiteres Zahlensy- 
stem behandeln... 
Binärsystem 

Alle heute am Markt erhält- 
lichen Microcomputer ar- 
beiten mit dem binären Zah- 
lensystem. Das kommt da- 
her, daß eine Schaltung 
immer nur eine von zwei Zu- 
ständen annehmen kann; 
entweder fließt Strom oder es 
fließt keiner. 

Wie in jedem Zahlensystem, 
so ist auch im Binärsystem 
jede Zahl darstellbar. Da 
das oben vorgestellte Hexa- 
dezimalsystem eine Darstel- 
lung mittels einer Potenz der 
Zahl 2 ist (2 hoch 4=16), las- 
sen sich alle Hexa-Ziffern 


durch vier Binärziffern 

wiedergeben. 
Dezimal Hex Binär 
(0) () 0999 
1 1 9991 
2 2 9919 
3 3 9911 
4 4 9199 
5 5 9191 
6 6 9119 
7 7 9111 
8 8 1999 
9 9 1991 
19 A 1919 
sh B 1911 
12 c 1199 
13 D 1191 
14 E 1119 
15 [2 1111 
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Interne Zahlendarstellung 
Sicher haben Sie in Basic 
schon einmal den Peek- 


Befehl verwandt. Sie er- 
hielten dann eine Zahl, die 
zwischen 0 und 255 lag. Das 
kommt daher, daß der Z80- 
Assembler eine "”Byte-Ma- 
schine” ist, d.h. daß alle 
Speicherstellen 8 bits umfas- 


0011 1100 
3 c 
60 


Z-80 Registersatz 





sen, und daß die kleinste Ein- 
heit, auf die zurückgegriffen 
werden kann, 8 bits groß ist. 
Deswegen eignen sich Hexa- 
dezimal-Ziffern optimal zur 
Darstellung von Speicher- 
inhalten. 

ZB; 


---,' binär 
hexadezimal 
dezimal 





normaler 
Registersatz 


























Was sind Register? 

Register sind Speicherstel- 
len, die benutzt werden, um 
Werte zu verändern. Ohne 
sie könnte kein Z80-Pro- 
gramm laufen. Wie das Schau- 
bild zeigt, gibt es in der obe- 
ren Hälfte 2x8 Register. Von 
diesen 16 Registern sind aber 
nur jeweils 8 auf einmal be- 
nutzbar, d.h. dort, wo der 
Pfeil hinzeigt, befindet sich 
theoretisch ein Schalter, mit 
dem man zwischen beiden 
Registersätzen umschalten 
kann. 


A-Register: Dies ist eines der 
wichtigsten Register. 
Man.nenntes auch Akkumu- 
lator. Es ist das Haupt- 
rechenregister. 


F-Register: Dieses Register 
kann im Gegensatz zu den 
anderen "Normalregistern’ 
nicht als Speicher verwendet 
werden. Stattdessen werden 
dort. die einzelnen Bits als 
Flags interpretiert. Was 
Flags sind, werden wir 
noch besprechen. 
B-Register: Das B-Register 
ist auch sehr wichtig: Man 
benutzt es häufig, um Schlei- 
fen zu bilden, damit der Z80 
einen Befehl akzeptiert, der 
dieses Register als Bedin- 
gungs-Register benutzt. 
C-Register 

bis 

L-Register: Diese Register 
sind als Einzelregister uni- 
versell einsetzbar und un- 
tereinander als gleichwertig 
anzusehen. 


alternativer 
Registersatz 
R 








Nun erlaubt der Z80 aber, 
daß man die 3 unteren 'neben- 
einander liegenden’ Regi- 
ster (BC, DE und HL, bzw. 
D',C’, D’, E’, H’, C’) als Dop- 
pelregister benutzen kann, 
was auch notwendig ist, 
wenn man folgendes be- 
denkt: In 8 bits bzw. 1 Byte 
läßt sich höchstens eine Zahl 
darstellen, die binär 1111 
1111 groß ist. Das entspricht 
2 hoch 8 -1 bzw. 255 dezimal. 
Wenn dies alles wäre, könnte 
man also nur 255 verschie- 
dene Adressen ansprechen. 

Durch die Benutzung zweier 
Register als Doppelregister 
jedoch lassen sich Zahlen bis 
2 hoch 16 -1 darstellen. Und 
dies entspricht 65535 (=K- 
Byte). 

Das zeigt auch, warum man 
bei einem Z80-Prozessor nur 
64K auf einmal ansprechen 
kann- weilsich eben einfach 
nicht mehr adressieren läßt. 


So, nun gibt es noch einige 
Spezialregister, die wir auch 
gleich besprechen wollen. 
IX- und IY-Register: Diese 
Doppelregister sind 16 bits 
groß und lassen sich nicht 
trennen. Sie sind die soge- 
nannten Index-Register des 
Z80. 

SP-Register: Dieses Register 
enthält eine Adresse, die als 
Stapelzeiger benutzt wird. 
Was ein Stapel ist, kommt 
auch später. 

PC-Register: Das PC-Re- 
gister enthält eine Adresse 
des nächsten auszuführen- 
den Befehls. 

I-Register: Ist das Interrupt- 
Register: Seine Funktion 
wird im Abschnittüber Inter- 
rupts besprochen. Wird nor- 
malerweise gar nicht ver- 
wendet. 

R-Register: Dieses Register 
nennt man Refresh-Register 
und dient dazu, den norma- 
len Speicher "aufzufri- 
schen”. Es ist für uns un- 
interessant, da er nur dazu 
dient, den Aufwand an zu- 
sätzlicher, Hardware zu 
verkleinern. 


Damit soll der erste Teil 
dieses Kurses in Z80-As- 
sembler beendet sein. Wir 
hoffen, daß Sie sich nicht 
durch die umfangreiche 
Theorie abschrecken ließen. 
Im nächsten Teil ändert 
sich das... 
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für den ZX-81 


Das beliebte Ratespiel um Wörter und Begriffe bedarf keiner beson- 
deren Erklärung mehr: Wir beschränken uns Ba auftechnische 


Hinweise! 


Zuerst wird das Basic-Programm ein- 
gegeben und durch "RUN 9000” ge- 
startet. Dann werden die MC-Daten 
hexadezimal mittels "INPUT” in Zeile 
1 gepoked, wo durch einen REM-Be- 
fehl 67 Speicherplätze freigehalten 
werden. 

Ab 9300 müssen nun dem Computer 
Wörter, die nicht mehr als 15 Buchsta- 
ben haben dürfen, eingegeben werden. 
Wurde aus Versehen eine falsche Ein- 
gabe gemacht, kann man diese korri- 
gieren, indem man ”R” wie rückwärts 
eingibt. Dies gilt auch für das MC- 
Eingabeprogramm. Nur falsch geschrie- 
bene Wörter oder ein falscher Hex.- 
Code können zu Fehlern führen. 

Will man den Wörtereingabeteil been- 
den, tippt man "Ende” ein. Will man 
später noch weitere Wörter hinzufügen, 
tippt man nur "GOTO 9300” ein. 

Als nächstes kann das Programm geSA- 
VEd werden. Dazu ist lediglich 
”START” einzugeben..Ist das Pro- 
gramm auf Band und der Abspeiche- 
rungsvorgang beendet (ca. 6 1/2 Mi- 
nuten), startet sich das Spiel von 
selbst. 

PS: Es versteht sich, daß nicht unbe- 
dingt die Wörter der mitgelieferten Da- 
tenliste verwendet werden müssen. Sie 
dienen lediglich zur Überprüfung. 


Spielablauf: 

Als erstes wird entschieden, ob eine 
Spielanleitung benötigt wird- dann, ob 
man zu zweitodergegen den Computer 
spielen möchte. 

“Anschließend werden die Namen der/ 
des Spieler(s) eingegeben. Spielt man 
zu zweit, gibt man dem anderen jeweils 
ein Wort vor. 

Für kurze Zeit (ca. 5 Sek.) schaltet der 
Computer zum Bildaufbau in den Fast- 
Modus. Dann kann man durch 
Drücken einer Taste sehen, ob der 
Buchstabe irgendwo im gesuchten Wort 
vorkommt. Meint man das Wort zu 
kennen, drückt man ”Newline” und 
gibt das ganze Wort ein. Dies muß im- 
mer getan werden, auch wenn das Wort 
bereits vollständig auf dem Bildschirm 
stehen sollte. Hat man das Wort richtig 
erkannt, so blinkt der Bildschirm, an- 
dernfalls kommt die Meldung "Das 
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war wohl nichts”. 

Die Anzahl der Versuche wird unten 
angezeigt. Man erkennt auch, daß der 
Computer einen Buchstaben ange- 
nommen hat, wenn sich die Zahl um 
l erhöht. 

Nach jeder Runde erfolgt eine Spiel- 
standsanzeige. Es wird solange gespielt, 
bis einer.der Spieler komplett am Gal- 
gen baumelt. 

Da dem Computer ja kein Wort vorge- 
geben werden kann, werden ihm im 
umgekehrten Verhältnis so viele Ver- 
suche angerechnet, wie der Spieler 
braucht (Zeile 8130 : Faktor 22 - Ver- 
suche des Spielers). Diese Zahl22(H 21 
+Hl) kann natürlich geändert werden. 
Doch muß man dabei bedenken, daß 
spätestens nach 26 Versuchen das Wort 
gefunden ist und Vokale (a,e,u,i,0) sehr 
oft vorkommen, so daß dieser Faktor et- 
was niedriger als 26 sein sollte. 

Ist nun jemand ”tot”, kommen die dem- 
entsprechenden Informationen und 
das Spiel ist beendet. 

Dann entscheidet man, ob ein weiteres 
Spiel gestartet werden soll. Wenn nicht, 
verabschiedet sich der Computer 
und löscht das Programm. 


Programmaufbau: 

Gestartet wird mit RUN 9000 

1: Maschinencode 

3-4: Bildaufbau, Variablen löschen 
5-9: Abfrage, ob Erklärung benötigt 
wird 

10-18: Abfrage, 
teilnehmen 
100-1100: Unterprogramm: Spielteil; in 
dem versucht wird, das Wort heraus- 
zufinden 

2000: Bildaufbau 

2100: Variablen löschen 

7000-7200: Spielaufbauteil für 2 Spieler, 
die sich gegenseitig Worte vorgeben 
7205-7290: Ausgabe des Spielstandes 
7295-7520: Das Spiel geht weiter, wenn 
keiner der Spieler '”tot” ist (Rück- 
sprung), andernfalls erfolgen weitere 
Informationen 

7600-7660: Abfrage, ob noch einmal ge- 
spielt werden soll 

7800-7870: Endteil 

8000-8180: Spielaufbauteil gegen den 
Computer 


‚wieviel Mitspieler 
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8900-8987: Spielanleitung 

9000-9230: Aufbau der Felder, Varia- 
blen 

9250-9300: Eingabe der Maschinen- 
code-Daten 

9300-9390: Eingabe der Wörter (Wort- 
schatz) 

9500-9600: SAVEn des Programmes und 
START bei l 


Variablenliste: 

A$ (4,4): Zeichen, aus dem der Bild- 
schirm aufgebaut wird 

d$ (400,15): Wortschatz des Com- 
puters; er beinhaltet maximal 400 Wör- 
ter mit je maximal 15 Buchstaben 

€ (400): Länge der jeweiligen Wörter 
P$ (2,15): Namen der Mitspieler 

P (2): Versuche der Mitspieler, das 
Wort herauszufinden 


String-Variablen: 
S$: Zeichen des 
chens 

D$: PRINT-Position. der einzelnen 
Zeichen des Männchens 

H$: Hilfsstring 

N$: Wort, welches zu erraten ist 

1$, J$: Stringketten, die zu Abfrage- 
zwecken verwendet werden 


”Hangman”-Männ- 


Einfache Variablen: 

MAX: Anzahl der Wörter des Wort- 
schatzes 

DEAD: Nummer des Toten bzw. der 
Toten 

Z: Zähler der Versuche im Unter- 
programm 

N: Länge von N$ (Anzahl der Stellen) 
TZ: Zeitzähler, der ermittelt, ob je- 
mand zuviel Zeit benötigt 

H0...H21: Hilfsvariablen, die aus 
Speicherersparnisgründen verwendet 
werden 


Adressen: 

SCREEN: MC-Programm zum Füllen 
des Bildschirms mit einem Zeichen, 
das in die Adresse "INSERT” ge- 
POKEed wird 

INVERS: Bildschirminvertierung 
MEMORY: Anzeige über verbliebenen 
Speicher (Wert ist im BC’Register 
gespeichert) 
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gönnen" 


Sofort nach dem Ladevorgang durch 
LOAD” ” oder LOAD”FG” erscheint 
eine Benutzeranweisung in Kurzform. 
Nachdem die Aufforderung "-TASTE- 
DRÜCKEN-” quittiert wurde, werden 
vom Benutzer 7 Werte erfragt, die die zu 
erstellende Form festlegen. Diese wer- 
den entweder mit einer Zahl oder mit 
einer Newline beantwortet, wobei New- 
line die Zahl, die in der Klammer steht, 
ersetzt. Dies wurde gemacht, damit oft 
gleichbleibende Werte wie Radius oder 
Mittelpunkt schneller eingegeben wer- 
den können. Die sieben Fragen sind ge- 
mäß Zeile 1205: 

- Anzahl der Ecken: Für Dreieck=3; 
für Quadrat=4 ect. 

- Ecken überspringen: Soll die Teillinie 
zwischen zwei benachbarten Eck- 
punkten gezogen werden, so ist eine 0 
einzugeben, wenn jede zweite Ecke 
durch die Linie verbunden werden soll, 
eine | usw. 

- Drehen der Form: Bei 0 ist die An- 
fangsecke der Form immer über dem 
Mittelpunkt. 1 heißt, die Form wird um 
eine Ecke gedreht, 0,5 bedeutet eine 
halbe Ecke der aktuellen Form usw. 

- Mittelpunkt X,Y-Koordinate: Ent- 
spricht den normalen Plot-Koordina- 
ten, kann aber durchaus auch außer- 
halb des Bildschirmes liegen. 

- Radius X,Y-Richtung: Entspricht 
dem Radius des umschreibenden 
Kreises. 


Nach der Eingabe beginnt der Com- 
puter zu zeichnen. Er kann angehalten 
werden, indem man Newline gedrückt 
hält. In diesem Fall wird er nach der 
Fertigstellung einer Teillinie, sonst 
nach der Fertigstellung der ganzen Fi- 
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gur, fragen, ob invertiert werden soll. 
Soll der augenblickliche Status (invers 
oder normal) beibehalten werden, so 
muß gemäß Aufforderung nur Newline 
gedrückt werden. Wird die Frage 
”#COPY=...” mit 1 beantwortet, so er- 
hält man bei angeschlossenem Drucker 
eine Bildschirmkopie. Um den Bild- 
schirm zu löschen, muß man die fol- 
gende Frage ”*LOESCHEN==1....” mit 
l beantworten. Danach fährt das Pro- 
gramm wieder mit Abfrage der 7 
Werte fort. 


Probelauf: 

Beim Start des Programmes werden die 
7 Werte so eingestellt (Zeilen 1030- 
1055), daß ein Achteck gezeichnet wird, 
d.h. man muß die 7 Fragen nur mit 
Newline beantworten, damit das Acht- 
eck gezeichnet wird. 


Programmaufbau: 

Zeile 10: REM-Zeile für die Ma- 
schinenprogramme 

Zeilen 30-140: Errechnung der Werte, 
um die Form zu zeichnen 

Zeile 105: Abfrage: Liegt der zu 
PLOTende Punkt noch innerhalb des 
Bildschirmes? 

Zeile 135: Abfrage: Newline gedrückt? 
Zeilen 145-160: Abfrage: Inversion ja/ 
nein, wenn ja, dann Aufrufen des Ma- 
schinenprogrammes ab 16532 

Zeilen 165-180: Abfrage: COPY ja/ 


nein 
Zeilen 185-200: Abfrage: Löschen ja/ 
nein, wenn ja, dann Aufrufung des Ma- 
schinenprogrammes ab 16514. 


Unterprogramm 1000: Wird nur einmal 
zu Beginn aufgerufen. Es definiert die 
Variablen, POKEd die Maschinenpro- 
gramme in die erste REM-Zeile und 
sorgt für die Laufschrift. 


Unterprogramm 1200: Erfragt vom Be- 
nutzer die Parameter. Zeile 1225 ist not- 
wendig, damit Zeile 40 nicht zur Unter- 
brechung führt. 

Unterprogramm 1300: Wird aufgerufen 
zum abSAVEn. Die Bedienungsan- 
leitung wird gedruckt und danach so- 
fort'mit dem Programm geSAVEd. Da 
der: Bildschirmspeicher beim ZX-81 
mit 16K immer mitgeSAVEd wird, er- 
scheint die Anleitung sofort nach Been- 
digung des Ladevorgangs. 
Unterprogramm 1400: Hat nichts direkt 
mit dem Programm Formengenerator 
zu tun, gibt aber bei Aufruf an, wieviel 
Platz der Programmspeicher belegt 
und wieviele Programmzeilen bis ein- 
schließlich‘der Zeile 1445 SLOW (die 
auch mitten in einem Programm 
stehen kann) vorhanden sind. Der 
Code für SLOW in Zeile 1430 kann ge- 
ändert werden, um die Zeilenanzahl 
bis zu einem anderen Codewort zu 
bestimmen. 


Variablenliste: 

Feld A(7): Enthält die Parameter zur 
Form 

IN: Bei inverser Darstellung=1,sonstO 
W: Konstante für die Zeilen 65-80 

A$: Hex-Code für die Maschinenpro- 
gramme, später Eingabevariable 

B$: Text der Laufschrift 

A,B: Anfangskoordinate der zu ziehen- 
den Linie 

C,D,E,G,H,K,T,X: (Hilfs-) Werte für 
die Errechnung der Form 


In seltenen Fällen kann es vorkommen, 
daß die Zeile "INVERS=.." nicht er- 
scheint, obwohl die Figur fertig ge- 
zeichnet wurde. Dies liegt an derunkor- 
rekten Berechnung des Wertes X, die 
aus Zeitgründen so gestaltet wurde. In 
diesem Fall ist so lange Newline ge- 
drückt zu halten, bis die Zeile ”IN- 


. VERS=...” erscheint. (Auch nicht 


schlimm, oder???) 
Wir wünschen allen mit diesem Pro- 
gramm viel Spaß! 
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Wortkniffel 


MR 


für den Laser 210/310 


Das Programm ”Wortkniffel” erzeugt 
ein 10x 20 Zeichen großes String Array 
und füllt es mit zufällig gewählten 
Buchstaben auf. 

Danach können Sie max. 8 Buchstaben 
lange Wörter eingeben, die der Com- 
puter an willkürlich gesetzten Positio- 
nen in verschiedenen Richtungen in 
das Array schreibt. 

Außerdem kann er noch (RND- 
gesteuert) Wörter umdrehen. 

Er bringt das so erzeugte Variablenfeld 
auf den Bildschirm, und Sie müssen 
nun versuchen, die eingegebenen Wor- 
te wiederzufinden. Sie können mit 
dem Befehl ”COPY” das Rätsel sowie 
die zu suchenden Wörter ausdrucken 
lassen. 

Erschwert wird das Spiel dadurch, daß 
sich manche Worte überdecken. 

Gott sei Dank können Sie sich jedoch 
durch die komfortable Menüsteuerung 
jederzeit die Auflösung zeigen lassen. 
Zum Ausprobieren befindet sich am 
Ende des Listings ein Beispiel, das von 
uns erstellt wurde. Die Auflösung fin- 
den Sie auf Seite... 

Ein Tip für Rätselprofis: 

Wenn Sie Zeile 5010 gegen 
5010HI=int(RND()):A$(G,H) =HI 
austauschen, so können Sie Wortknif- 
fel auch mit Zahlencodes spielen. Sie 
werden feststellen, daß es unheimlich 
schwer ist, einen rückwärts gedrehten, 
8-stelligen Zahlencode in einer 10x 20 
Zahlen-Matrix wiederzufinden. 


@ REM WORT-KNIFFEL BY WERNERKKKKKGREETIN 
6S TO PHD 

1 CLEAR1890:CLS:PRINT@238, "INITIALISIERU 
NG" :GOTO18:CLS 

2 B=8+32:W=W+1 :PRINT@B," 
:B=0:G0T04 

3 FORQ=9T028 :PRINTASCW,Q) ; :NEXTQ:GOTO2 

4 PRINT@B, "MENUE: COPY.AUFLOESUNG" ;:IFIN 
KEY$="C"THENGOSUBSI99 

5 PRINT". ENDE. WORTE. SUCHEN" :IFINKEY$="S" 
THENCLS :G0T02 

6 IFINKEY$="W" THENGOSUB8988 

? IFINKEYS="E"THENSTOP 

8 IFINKEYS="A"THENCLS :GOSUB6999 

9 60704 

18 DIMASC19, 28) :DINWSC9, 13) :AN=Q:U=@ 

11 DINOsC19, 28) 

16 GOSUBSEaB 

17 CLS: FORME=1TOB 


":IFW> LOTHENW=® 
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18 P1=8:P2=8:P3=8:P4=9:P5=8 

28 INPUT"SUCHWORT" ;B$ 

21 AN=AN+I 

29 Q=INTCRND(4)) 

38 L=LENCB$) 

48 IFL<2ORL>BTHENGOTO28 

5@ FORLA=1TOL 

68 X$=LEFT$CB$,LA):YS=RIGHTSCKS, 1) 

61 U=Url :USCAN,UJ=Y$: IFU>=SLTHENWSCAN,L+I 
=".x ":U=0 

88 IFQ=1THENGOSUB189@ 

98 IFQ=2THENGOSUBI818 

188 IFQ=3THENGOSUB1928 

118 IFQ=4THENGOSUB1938 

128 IFQ=STHENGOSUB1848 

138 NEXTLA:NEXTME :CLS:GOTO2 

1888 IFPI<»OTHENGOTO1BB3ELSEPI=INTERNDCI 
8)) :C=INTCRND(29)) 

1881 IFPI<LTHENP1=9:G0T01008 

1883 As(CP1,C)I=Y$:COLOR4 :0$(P1,C)I=Y$ 

1884 P1=P1-1 

1885 RETURN 

1818 IFP2<>ATHENGOTO1B13ELSEP2=INTERNDCI 
8)):C=INTCRNDC28)) 

1811 IFP2>18-LTHENP2=9:G0T01818 

1913 A$CP2,C)=Y$ :COLOR4 :0$(P2,C)=Y$ 

1814 P2=P2+1 

1815 RETURN 

1828 IFP3<>ATHENGOTO1923ELSEP3=INTERNDC2 
83) :C=INTERNDC18)) 

1821 IFP3<LTHENP3=9:G0T01928 

1923 ASCC,P3I=Y$ :COLOR4 :0$CC,P3)I=Y$ 

1824 P3=P3-1 

1825 RETURN 

1838 IFP4<>ATHENGOTO1833ELSEP4=INTCRNDL2 
8)) :C=INTCRNDC18)) 

1831 IFP4>29-LTHENP4=8:G0T01838 

1833 AS$CC,P4)=Y$:COLOR4:0$CC,P4)=Y$ 

1834 P4=P4+1 

1835 RETURN 

5808 FORG=8T019:FORH=0T028 

5018 HI=INTERNDC25))+65:A$LG,HISCHRECHII 
Sall 0$LG,HJ="+" 

5828 NEXTH :NEXTG :RETURN 

5999 COPY 

6888 LPRINT"FOLGENDE WORTE SIND ZU FINDE 
Na 

6881 AS=AS+1:FORSA=1TO8:LPRINTWSCAS, SA); 
!NEXTSA:LPRINT 

6882 IFAS>8THENAS=8 :RETURN 

6883 GOTOSBB1 

6999 B2=B2+32 :W2=W2+1 :PRINT@B2, " 
18THENW2=8:82=9:G0T04 

?888 FORQ2=8T028::PRINTOSCW2, 02) ; :NEXTQ2: 
GOT06399 

8608 CLS: PRINT"SUCHEN SIE FOLGENDE WORT 
ESRU 

8801 AB=AB+1:FORSB=1T08:PRINTWSCAB,SBI 5: 
NEXTSB 

8802 IFAB>BTHENAB=8 :RETURN 

8883 GOTO8981 


"SIFW2> 


N 


MENUE : 

E. SUCHEN 
LJUJXWWRSWBRETTOLPQO 
GOSUBXSWXTMHHOTOIMJT 
XWTDF IJCUZDYUCOLORYD 
GEUGSTFRYWOIUTMUENNR 
FROGUYCETERMINALPWZPR 
HNYCGO IHNWIEURPMNYUUY 
RETURNFFGSEDTHDIGYNB 
GRZYDSPOBPALPNRUYDGU 
OCBOFURJCBP I IWSMCWUC 
IELZIFLYOIRRESALOYST 


Laser 210 


ai 


COPY. AUFLOESUNG. ENDE. WORT 


FOLGENDE WORTE SIND ZU FINDEN 


WERNER &* 
LASER * 
PLOTTER % 
TERMINAL 
RETURN & 
GOSUB * 
INPUT & 
COLOR * 


MENUE : 

E. SUCHEN 
+ttttttttttRETTOLP++ 
GOSUB+FFrrFrrrFrrrrt 
+uttttttrttttCOLOR+t 
HErrtrrrr terre r rt tt 
+Rtt++tTERMINALP+++r 
+NtttttttrtttrtNtttr 
RETURN+ttHrHtrtH tt tt 
+Rttrtttrtrtt rt rt tr rt 
Artttttttttrtttttttt 
AttrtttttttRESAL+ttt 


COPY, AUFLOESUNG. ENDE. WORT 


FOLGENDE WORTE SIND ZU FINDEN 


WERNER x 
LASER * 
PLOTTER % 
TERMINAL 
RETURN * 
GOSUB * 
INPUT % 
COLOR * 
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ATARI 800XL 


aSchbenoieB 


für alle Atari-Computer mit Joystick 


Verbessern Sie Ihre Finanzen mit 
Ronny, dem Taschendieb - natürlich 
nur in diesem Spiel. 

Am einfachsten ginge dies wchl, so 
möchte man meinen, indem man 
nichtsahnende, vorbeigehende Pas- 
santen die Brieftasche klaut! 

Aber nein, so geht es nun wirklich 
nicht, denn das Auge des Gesetzes ist 
wachsam und taucht in Gestalt eines 
Polizisten in unregelmäßigen Abstän- 
den auf, um den Dieb zu fangen. Doch 
nicht nur der Polizist, sondern auch ein 
”Bus” hat es auf Ronny abgesehen. 
Es'ist deshalb ratsam, die untere Fahr- 


36 CC=2:DIN B(S),PC6) :LE=3:SK=Q,9:SKB=B. 
95 

188 REM HINTERGRUND 

118 GRAPHICS ?+16:CC=2 

115 SETCOLOR 8,8,8:SETCOLOR 4,8,9:SETCOL 
OR 1,8,8:SETCOLOR 2,0,8 

116 COLOR I 

128 PLOT 8,79:0RAWTO 159,79 

138 FOR 1=28 TO 139 STEP 49 

148 PLOT 1,98:DRAWTO 1+28,98:DRAWTO 1+28 
»94 :DRAWTO 1,94 :DRAWTO 1,98:POSITION 1,9 
4:POKE ?765,1:X10 18,46,9,0,"S" 

150 NEXT I t 
168 COLOR 1:FOR I=1 TO 5:PLOT 159,89+1:D 
RAWUTO 149,89+1:NEXT I 

162 COLOR 3:PLOT 183,79:DRAWTO 183, 19:DR 
AUTO 58, 18:DRAUTO 58,79:POSITION 58, 18:P 
OKE 765,3:X10 18,46,8,8,"S" 

288 COLOR _.PLOT 48,79:DRAUTO 48, 18:DRAW 
TO 8, 18:DRAWTO 8,79:POSITION 8, 18:POKE ? 
65,3:X10 18,46,8,8,"S" 

218 COLOR 3:PLOT 159,79:DRAWTO 159, 18:DR 
AUTO 128, 18:DRAWTO 128,79:POSITION 128,1 
8:POKE 765,3:X10 18,#6,8,8,"S" 

219 COLOR 1:FOR F=8 TO 128 STEP 68 

228 FOR I=6 TO 38 STEP 8 

238 FOR II=13 TO 53 STEP 8 

248 PLOT I+S+F,11+5:DRAWTO I+5+F, I1:DRAW 
TO I+F,I1:DRAWTO I+F, I1+5:DRAWTO I+S+tF,1 
1+5 
258 
268 


NEXT II 

NEXT I 

278 NEXT F 

308 COLOR 2:FOR I=1 TO 8:PLOT 68,58+1:DR 
AWTO '108,5@+1:NEXT I 

328 RESTORE 338:FOR I=1 TO I18:READ A,B;C 
‚D:COLOR 3:PLOT A,B:DRAWTO C,D:NEXT I 
338 DATA 62,52, 78,52, 78,52,70,54,78,54,6 
2,54,62,54, 62,56, 62,56, 78,56, 78,56, 78,54 
‚78,54,62,54,62,54,62,52,62,52 

348 DATA 62,52 

345 DATA 76,52,76,56, 76,56,84,56,84,56,8 
4,52,84,52,84,52 

358 DATA 98,52,98,52,90,52,90,54, 38,54,9 
8,54,98,54, 98,56, 98,56, 98,56, 98,56 

498 SETCOLOR 8,8, 15:SETCOLOR 4,8,8:SETCO 
LOR 1,8,8:SETCOLOR 2,13,8 

788 REM MENSCHENMENGE 

785 COLOR 1:M=2:5T=8 

?18 FOR I=ı T0 5 

712 2=INTERNDLOIKB)+ST+B 
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bahnhälfte zu benutzen. 

Ein Tip von uns: 

Die Brieftasche stehlen Sie am besten, 
indem Sie sich möglichst nah (aber 
bitte nicht zu nah - denn das würde be- 
stimmt schiefgehen) an die Passanten 
heranschleichen, und den Knopf des 
Joysticks betätigen, wodurch Ronny 
nach der Börse greift. Bei diesem span- 
nenden Unternehmen muß Ronny von 
der rechten oder linken Seite zu sehen 
sein. 


Variablenliste: 
X: Horizontale Position von Ronny 














Y: Vertikale Position von Ronny 

PM: Player Missile 

PB: Player Missile Basis 

BX: Horizontale Position vom Bus 
BY:-Vertikale Position vom Bus 

PX: Horizontale Position des Poli- 
zisten 

PY: Vertikale Position des Polizisten 
DM: Einnahmen 

IM: Einnahmen insgesamt 

LE: Anzahl der noch vorhandenen 
Leben 

SK: Häufigkeit des Polizisten 

SKB: Häufigkeit des Busses 

J: Joystickposition 


?15 IF M+2>32 AND M+2<66 THEN ST=ST+1:6G0 


To 712 


?17 IF M+2>95 THEN AM=I-1:6G0T0 1988 


725 N=N+2:BCl)=M 


?38 PLOT Mt1,68:PLOT M+3,68:PLOT N,69:PL 
OT M,?@:PLOT M+2,69:PLOT M+4,69:PLOT Nr4 


‚78 


748 PLOT M+1,?1:DRAWTO M+3,71:PLOT M,72: 
DRAWTO M,?5:PLOT M+4,72:DRAWTO M+4,75:PL 


OT M+2,73:PLOT M+2,75 


?5@ PLOT M+1,76:DRAWTO M+t1,78:PLOT M+2,? 
6:DRAUTO M+2,78:PLOT Mt3,76:DRAUTO M+3,7 


8:PLOT M,?8:PLOT M+4,78 

?6@ NEXT I 

1888 REM PLAYER SETZEN 

1919 PN=PEEK(1986)-32 :PB=PMx256 
1828 POKE 54279, PM 


1838 FOR 00=PBt1822 TO FB+1792:POKE 00,9 


"NEXT 90 

1848 X=170:Y=175 

1845 POKE 623,1:POKE 789,8 
184? POKE 53256, 8:POKE 53257,8 
1858 
1960 
2808 
43,PX 


GOSUB 3988 


POKE ?84,1:POKE 559,62:POKE 53277,3 


POKE 785, 123:PX=158:PY=175:POKE 532 


2818 RESTORE 2188:FOR Q=PB+1288+PY TO PB 


+1295+PY:READ. T:POKE Q,T:NEXT Q 


2188 DATA 8,28, 124,20,32,24,24,36,68,68, 


68, 24,38, 18,48,0,0 
2280 REM BUS 


2218 POKE 796,78:BY=192:BX=18:POKE 53258 


‚BX:POKE 53258, 3 


2228 RESTORE 2248:FOR '0=PB+1536+BY TO PB 


+1552+BY:READ T:POKE Q,T:NEXT Q 


2248 DATA 0,0,0,252,234, 170,178, 171,258, 


255, 175,255, 189, 85, 239, 130 
2488 GOTO 4939 

2508 REM BRIEFTASCHE 

2562 AA=INTERNDC@JKAMI+I 
2503 FOR BB=1 TO 3 

2505 FOR BR=1 TO 3 

2587 A=BLAA)I+BR 

2518 COLOR CC:PLOT A,?1+BB 
2512 
A+2,?1+BB 

2528 NEXT BR 

2538 NEXT BB 

26988 RETURN 

3888 REM DIEB INITIALISIEREN 


IF BB=2 THEN PLOT A-3,71+BB:DRAWTO 
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3818 RESTORE 3929:FOR A=1536 TO 1568:REA 
D I:POKE A, 1:NEXT A 
3828 DATA 184,184, 133,204, 184,133, 283,18 
4,133, 287,184, 133,206, 160,0, 177, 286, 145, 
203, 2080, 192, 16,208, 247,96 
3038 RESTORE 3949:FOR A=268 TO 355:READ 
T:POKE A,1:NEXT A 
3848 DATA 56,56, 255,36, 68,60, 68,698, 124,6 
8,24,24,24,24,120,8 
3858 DATA 56,56, 254,49, 36,56,56, 60,56,56 
‚24,24,24,24,28,@ 
3868 DATA 28, 28,63, 146, 130,94,62,62,62,3 
0,12,12,12,12,68,0 
3878 DATA 56,56, 251,41,33,58, 60, 60,56,56 
‚24,24,24,24, 28,0 } 
3888 DATA 28,28,127,20,8,28,8,127,93,93, 
93,28, 20,26,54,0@ 
3885 DATA 0,9,0,0,0,0,0,0,39,6, 134, 134,1 
66,222, 159,0 
3898 FOR A=1 TO 6:READ I:PLA)=I:NEXT A:D 
ATA 260,276, 292, 308, 324,340 
3188 POKE 53248,%:G=1 
3118 C=8:FOR A=PB+1924+Y TO PB+1839+Y:PO 
KE A,PEEKLPLGItCI:C=C+1:NEXT A 
4988 RETURN 
4999 GOSUB 2599 
5888 REM HAUPTPROGRAMM 
5818 J=STICKLO) 
5@15 IF J=15 THEN 5878 
5828 IF J=? THEN. G=2:%x=X+2:G0SLUB 6909:6G0 
TO 5970 
5038 IF J=1l THEN G=1:%=X-2:G0SUB 6908 :6 
9TO 5978 
5835 D=USRL1536, PB+1824+Y,490) 
5848 IF J=14 THEN Y=Y-2:6=5:IF Y<175 THE 
N Y=Y+2 
5058 IF: J=13 THEN G=5:Y=Y+t2:IF Y>228 THE 
N T=Y-2 
5869 GOSUB 6188 
5878 POKE 53278, 0 
5075 ON PEEK(53252) GOTO 5088, 6209, 5088, 
5888, 6200, 6388 
5888 IF STRIGLA)I=@ AND 65 THEN D=USRCI 
536, PB+1824+Y,P(6G+2)):GOTO 5978 
59098 IF PEEKL53268)=2 OR PEEK(53268)=4 T 
HEN 65288 

Y=175 AND G=5 AND STRIG(8)=@ THE 


P=1 THEN 9888 
RNDCBJ>SK THEN P=1:G0T0 9888 
BU=] THEN 9588 
RND(BJ>SKB THEN BU=1:GOTO 9588 
GOTO 5888 
REM DIEB HORIZONTAL 
D=USRC1536,PB+1924tY,PCG)) 
POKE 53248,%:RETURN 
REM DIEB VERTIKAL 
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ATARI 800XL 


D=USRC1536, PB+1824+Y,P(G)) 

RETURN 

REM DIEB GEFASST 

POKE 53278, 

6218 D=USRC1536,PB+1924+Y,P(6)) 

6228 FOR I=288 TO 18 STEP -18:SOUND 8,1, 
18, 18:SOUND 1,209, 18; 18:NEXT I:SOUND 8,0 
»8,8:SOUND 1,8,9,8 

6222 D=USRL1536,PB+1924+Y, 490) 

6223 %=178:Y=175 

6225 LE=LE-1:IF LE=@ THEN 8298 

6226 D=USRC1536, PB+1924+Y,PC1)) 

6227 POKE 53248,% 

6223 FOR I=] TO 5@9:NEXT I 

6239 GOTO 5878 

6388 REM BRIEFTASCHE, BERUEHRT 

6318 FOR I=1 TO 3:SOLUND 8,388, 18, 18:FOR 
TI=1 TO S:NEXT II:SOUND 8,8,8,8:NEXT I 
5328 CC=3:G0SUB 2503 

6338 DM=DM+INTCRND(B)X19@)+1 

7888 CC=2:G0T0 49939 
8888 REM FLUCHT 
8005 POKE 53277, 
8818 GRAPHICS 2+16 
89812 IMm=Im+pm 

8828 POSITION 

vu 
8038 
DM" 
8848 POSITION 
8842 POSITION 
AMT =" 

8844 POSITION #65 1M;" DM." 

#058 FOR I=1 TO 1808@:NEXT I 

8868 DM=9:SK=SK-@. 96 :SKB=SKB-0.03 

8878 FOR I=1 TO 5:BCI)=8:NEXT I 

8188 GOTO 118 

8288 REM GAME OVER 

8205 POKE 53277,0 

8218 GRAPHICS 2+16 

8228 POSITION 5,5:? #65"GAME OVER" 

8238 POSITION 5,7:? #6;"DM: ";IM+DM 

8248 POSITION 5,93:? #6; "DRUECKE START" 
8256 IF PEEK(53279)=6 THEN RUN 

82608 GOTO 8258 

9888 REM POLIZIST BEWEGEN 

3818 PX=PX-3:IF PX<5 THEN P=9:PX=299:G0T 
0 5168 

3828 POKE 53249, PX 

‘838 GOTO 5168 

3509 REM BUS BEWEGEN 

3518 BX=BX+t5:IF BX>258 THEN BU=8:BX=18:G 
OTO 5888 

3528 POKE 53259,BX:SOUND 8,258, 18, 19:SOoU 
ND 8,9,8,8 

9538 GOTO 5988 


6118 
6128 
6288 
6285 


#6;"DEINE ”EINNAHMEN 


POSITION 


#6; "BETRAGEN ";DM;" 


#6 ;"LEBEN "LE 
#6; "EINNAHMEN INSGES 
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Rem PROGRAMMIERT VON 
HORST FRANKE 
DIM x3124,32) 
HOME 
As=" SPACE - INUMDERS“ 
FOR Y-1TU LENC As) 
CALL HEHARL28, 24 T,NSCE MIDSC As, 


NEXT OT 

RANDOMIZE 

FOR 11=110 24:FOR JJ=1TO 32:%8C] 
CHRSL 32) :NEXT JJENEXT II 

HonE 

Jn=a 

v-16 

1U=-@ 

CAuı CHARLI2E, BBBB167E7EIB") 

CALL SCKEENCIL,G) 

GOSUB 1740 

CALL CHRSOLI2,9; 11) 

CruL CHRCOL(I3,5,11) 

CALL CHARCIZI, "42247ESABOBEDICA2" 


CALL CHRCOL(15,12,11) 
TALL CHRCOL(E, 1,119 
CALL CHARLIB6," 1BFFOBDBFF24C3C3" 


CALL. CHRCOLCIB, 1,11) 

Cril CHARCILZ, "008886 10861988") 
CALl. CHnRi4B, 0066543BHC 3810") 
CALL CHARL41, "885476LC78384" ) 
Cru Chfirt43,'11925428FF 385492") 
CALL CHRCOL(S,9, 115 

CALL CHARLIBA,' 6BBBBBBBIE>FZFZF" 


CAiL CHAR(S0,"0818245AFF 244281") 
2rı=a 

MUSIC 9,15, "F3+F3" 

FOR Y=1T0 18 


360 
370 
EN = 
396 IF ZN=I2IHEN GOTO 320 
as MUSIC 8,15, "A3' music 1,15, "+F3" 
nUusIc 2, 15, "73" 
“16 FOR Y=1TO 15 
ar2 
HEN GOTO 450 
CALL HÜHAR(2A-2,%,32) :X8(2A-2,%) 
32) 
CALL HCHAR(ZA, X, 96) :X8 (2, X)=CHR 


IF ZAPBTHEN GOTO Saa 
Cr een 2,A, 100) ABl ERı 2, R 

I=CHRSC 106) 

480 IF 2ZAMETHEN GOTO 549 

A30 ALL HCHARCEA+4,X, 106) Rs lZn+4, X 
I=CHRSEC 196) 

sua IF ZN>ATHEN GOTO 548 

510  CALL HCHARLZA+B,X, 121) :X$CZAr6,X 
I=ChKst 121) 

520 IF 2M2THEN GOTO 540 * 

538  CNLL HCHARLZA+B,X, 121) :X$CZA1B,x 
I=CHRSC 121) 

Sa6 NEXT Y 

550 IF ZAZIHEN GOTO 58@ 

568  CALL HCHARC23,U-1,32):%$(23,U-1) 
=CHR$C 32) 

57?@ CALL HCHAR(23,U, 104) :%$(23, V)=CH 
RSC 184) 

588 KanSct INKEYS ) 

536 IF K=25STHEN GOTO 87@ 

698 IF K=32THEN GOTO 718 

518  KeASCt INKEYS ) 

028 IF KO 48THEN GOTO 878 

638  U=url 

648 IF W3ITHEN GOTO 669 

658  GOTO 56a 

668 vel-1 

678 IF U<3THEN GOTO 638 

688 CALL HCHARC23,U+1,32):%$(23,U+1) 
=CHK$t 32) 

698 CALL HCHARC23,U,194)::%$(23,V)=CH 
Rest 184) 

>88 GOTO 588 

718  B=24: 

728 BN=ASCE Xs(18,0)) 

30 MUSIC 0,15, "F4" MUSIC 4,15, "F3": 
PLar 

248 FOR Y=1T0 2 

758 8:B-7 

768 CALL VCHARCB,U,112):X$ CB, VI=CHRE 

112) 

7728  CALL UCHARCB,U,32):%8 CB, VISCHRSC 
32) 
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SPACE 


INVADERS 


Dieses, uns in die Spielhallen versetzende Spiel, kann es mit jedem der Ein- 
Mark-Automaten, sowohl von der Grafik, als auch vom Sound, leicht auf- 


nehmen. Da zeigt der BIT 90 was er kann. Leider ist die 16K- 
Erweiterung unerläßlich. 


Spielablauf: 


Am Himmel erscheinen 5 Reihen von feindlichen Angreifern, die nur darauf 
warten, die Erde zu bevölkern. Sie, in der Rolle des Piloten, ausgerüstet mit 
einem kleinen Raumschiff, sind der einzige Verteidiger, der das verhindern 
kann. Dazu können Sie mit der Space-Taste Schüsse abfeuern. Um den 
Schüssen zu entgehen, steuern Sie Ihr Raumschiff mit den Tasten 1 und 0 


nach links bzw. rechts. 


NEXT Y 

$D=2 

LK=NSCE X5018,0)) 

IF LK BNTHEN GOTO 1798 
Yu=Yurl 

IF YU>I3THEN GOTO 858 
GOTO 868 

GOSUB 1568 

GOTO 588 

W=INTE RUNDE 31 #1) 

IF W/2=INTC W/2)THEN GOTO 988 
G0TO 348 

Wehr] 

wsASct X$C18,W)) 

IF LO 32THEN GOTO 1638 
IF L=32THEN GOTO >88 
L=ASCC X8C18,W)) 

IF L=32THEN GOTO 876 
A=6 

A=Ar6 

MUSIC 8,15, "-A" MUSIC 4,15, "A3": 


CALL LCHARCA,W, 120) :%8 (A, WISCHRE 
CALL VCHARCA,MW, 323 :%6CA,WISCHREC 


IF M22THEN GOTO 1838 
GOSUB 168 
IF AC24THEN GOTO 978 
GOSUB 1380 
sOTO 588 
K=ASCC INKEY$ ) 
IF K& 25STHEN GOTO 1898 
RETURN 
IF K=49THEN GOTO 1178 
IF K=32THEN GOTO 1228 
IF K& 48THEN GOTO 1838 
Vauel 5 
IF W3ITHEN GOTO 1178 
CALL HCHARC23,V-1,32) :%6(23, 0-1) 
=CHR$C 32) 
1156  CALL HCHARC23,V, 184) :%$(23, V)=CH 
RC 104) 
11568 RETURN 
1178  V=u-1 
1188 IF V<3THEN GOTO 1128 
1198  CALL HCHAR(23,0+1,32):%8(23,Ur1) 
SCHR#( 32) 
1266 CALL HCHARC23,V, 104) :%$023, V)=CH 
RsC 184) 
1218 RETURN 
1220 B=24 
1238  KS=ASCC X$C10,0)) 
1248 MUSIC 8,15, "F3":MUSIC 4,15, "Ad": 
PLAr 
1250 FOR Y=1T0 2 
1266 B=B-7 
1278 CALL VCHARCB,V,112):%8CB, VISCHRE 
ce 112) 
1288 CALL VCHAR(B,V,32):X$(B, VI=SCHREC 
32) 
1238 
1368 
1318 LS: 





SCE X$018,0)) 


1328 IF LS) KSTHEN GOTO 1798 

1338  YusYurı 

1348 IF YWI4THEN GOTO- 1368 

1358  G0T10 1378 

1369  GOSUB 1568 

1370 RETURN 

1368  U=ASUl %$(23,0)) 

1396 IF Q=32THEN GOTO 1418 

1406 RETURN 

1418 MUSIC 4,12, "B" :PLAY 

1428 MUSIC 4,15, "B":PLAr 

1438 CALL HCHARC23, 0,48) :X6(23, VIACHR 
sc a0) 

144@  CALL HCHARC23,0,41):%$023, VISCHR 
scan) 

1458  CALL HCHARC23, 0,43) :%8(23, VI=CHR 
sc 43) 

1468 MUSIC 4,12,"C4" :PLAr 

1476 MUSIC 4, 15,"D4" :PLAr 

1480 FOR Y=1TO 1860 

1498 NEXT Tr 

1506 HOME 

151@ PRINT TAB 8) ;"GAME OVER" SPRINT 
"PRINT PRINT 

1528 PRINT "TASTE DRUECKEN FUER EIN N 
EUES 4 

1530 

1548 IF K=25STHEN GOTO 1538 ° 

1550  G0TO 58 

1568 FOR Y=3T0 17STER 2 

1578  Q=NSCt Xs019,1)) 

1588 IF Q& 32THEN GOTO 1378 

1598 O=ASCE X$C18,34-Y)) 

1608 IF 0% 32THEN GOTO 1378 

1618 NEXT Y 

1628 GOTO 338 

1636 G=S 

1648 IF WS3BTHEN GOTO 878 

1850  G=G+6 

16606 MUSIC 4,8, "+C3" :PLAr 

1678  CALL HCHARCG,W,42,3):FOR I1=WTO 
Wr2:%80G, IIISCHREC 42):NEXT II 

18808  CALL HCHARLG,W,32,3):FOR [1=WTO 
Hr2:%8(0G, II)SCHREC 32):NEXT II 

1698 IF G17THEN GOTO 1718 

1708 GOSUB 1968 

1710 IF G<23THEN GOTO 1650 

1728 GOSUB 1380 

1730  GOTO 566 

1248 As=" SCORE: " 

1758 FOR A=1T0 LENC As) 

1768  CALL HCHARCISAHA,ASCC MIDSC AsıA 
132 

1776 NEXT A 

1786 RETURN 

1796  JH=JHr25 

18608 Bs#=STRsC JM) 

1810 FOR Y=1TO LENL 8%) 

1828 CALL HCHARCI,ISFYRASCC MIDSC Bs, 
1,13) 

1838  NEAT Y 

1848 ON SDGOTO 133,828 

93995 SAVE "INVADER“ :GOTO 9999 
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Sharp MZ 700 











Sechser raus 


für den Sharp MZ 700 










Das Prinzip des Spieles scheint einfach, trägt je- 
doch bestimmt zu einem geselligen Un- 
terhaltungsabend mit der Familie und dem Com- 
puter bei. ; 
Nach dem Laden des Programmes kann es los- 
gehen: Mit zwei Würfeln, die Sie zur Verfügung 
haben, können Sie so oft würfeln wie Sie wollen. Es 
sollte allerdings jeder Spielteilnehmer einmal an 
die Reihe kommen! 

Für jede gewürfelte Zahl werden Ihnen Punkte 
gutgeschrieben. 

Sobald Sie allerdings mit einem der Würfel eine 
Sechs” werfen, verlieren Sie alle bisher gewonne- 
nen Punkte. 












A- REM KRKSECHSER RAUSKKH 37 FORI=1T048 

2 REM BY WERNER- 38 NEXTI 

3 REM 39 A$="NOCH EINMAL " 

3 REN. -HISTHEBESSSRAGS STE En 48 REM X* ERRECHNEN DER WUEFELWERTE *%X 
5 REM THIS IS WERNER BACK TI > 41 A=INTCSKRNDCIHII+ 

6 KEN «2 B=INTLEXRNDCI IH 

7 REM X TITELBILD UND SPIELRKLAERUNG X* NOTE 02oR 

8 CLS ; 44 NEXTI 

9- COLOR, ,,8:COLOR; ; ı® 45 PRINT 





18 PRINT" BEBBBBARRBBBSECHSER RAUS" 
11 PRINT" BBBBREBBRBBB--- 


42 PRINT 






45 PRINT"BEBBARRAAJETZT FALLEN SIE.." 
4? FORI=1T0588 









48 NEXATI 
43 PRINT"IN DIESEM SPIEL KOENNEN SIE MIT 49 REM ** GRAFIK ZEICHNE UND FARBE SETZE 
e N xx 
14 P=P+A+B 59 CLS 


45 PRINT"ZWEI WUERFELN SOOFT SIE 
16 PRINT"WOLLEN WERFEN. DIE AUGEN" 
17 PRINT"WERDEN ZUSAMMENGEZAEHLT2 







51 PRINT"DIE WUERFEL SIND GEFALLEN2L" 












52 GOSUBI7 
48 PRINT 53 X=2 
13 PRINT"WENN SIE ABER MIT EINEM DER" EEE 
54 REM %% WERT FUER WUERFEL 1% 
28 PRINT"WUERFEL EINE SECHS WERFEN" =a N 5 
21 PRINT"SO VERLIEREN SIE ALLE BISHER" Se alnen 
22 PRINT"GEWONNENEN PUNKTE" 57 REM x% WERT FUER WUERFEL 2 %% 
23 PRINT 58 C=B 
24 PRINT"BRBBBBBBLIUIEL GLUECKIL" BR 
25 PRINT" BBBBBBABERB--TASTE--" Be 






26 GETI$:1FI$=""THENGOTO26 






61 REM %%* RUECKSETZEN DER PUNKTEVARIABLE 












2% a BEI SECHSER WURF X 
enden 62 IFA=ÖTHENGOTD?4 
en 63 IFB=6THENGOTO?4 
$= an 
31 PRINT"ROMDBNOLLEN SIE * jns ;"WUERFELN? 3 BURSENERSEERNENOSEERABENSTEVORISBEE 
un" 
65 P=P+M4B 
32 GETIS:IFIS="N"THENGOTOBS ) \ M 
B RD. 8: “ : 
ee 2 LURSORB. I3:PRINT" IHR STAND BETRAEGT 
34 601032 i 
35 PRINTR" 






36 PRINT"DIE WUERFEL WERDEN GESCHUETTELT 
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67 H=H+A+B 

68 601031 

69 CLS 

78 PRINT"NA GUT. DANN HALT NICHT" 

71 PRINT 

?2 PRINT"SIE HAETTEN ";H-P;" PUNKTE ERRE 
ICHEN KOENNEN" 

73 G0T077 

74 CURSORB, 12:PRINT"SIE HABEN LEIDER VER 
LORENG I" 

75 P=Q 

?6 GOTO6? 

7? CURSORB, 5:PRINT"WOLLEN SIE ES NICHT D 
DCH " 

?8 PRINT"NOCH EINMAL VERSUCHEN <J/ND?" 
73 GETIS 

30 REM %* SPIELNEUBEGINN X 

81 IF1$="J" THENRUN 

82 REM X SPIEFLENDE %*% 

83 IFI$="N" THENSTOP 

84 G0T079 

85 REM X% AUSWAHL DER AUGEN FUER WUERFEL 
WERT X% 

86 ONCGOT087,89, 92, 95,99, 192 

87 CURSORCX+3I,6:PRINT"O" 

88 RETURN 

89 CURSORX,3:PRINT"O" 

98 CURSORLX+6), 3:PRINT"D" 

91 RETURN 

92 GOSUBBI 

93 GOSLB8? 

94 RETURN 

95 GOSUBBI 

96 CURSORX,9:PRINT"O" 

97 CURSORCX+6),3:PRINT"O!" 

98 RETURN 

99 GOSUBIS 

128 GOSUB8? 

181 RETURN 

182 GOSUBIS 
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CURSORLX+3),3:PRINT"O" 
CURSORLX+3),9:PRINT"D" 

RETURN 

REM %% UMRANDEN DER WUERFELFLAECHEN 


CURSORB, 1 :PRINT" 


PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

REM %%* WUERFELFLAECHE EINFAERBEN %% 
FOR F=2T018:FORQ=1T021 :COLORQ,F,,1:N 


EXTQ :NEXTF 
128 RETURN 























für den VC-20 + 16K 


Haben Sie nicht schon immer davon geträumt, als Aktionär eine 
ganze Menge Geld gewinnen und auch wieder verlieren zu können? 
CPU gibt Ihnen mit diesem tollen ”Geldadventure” (die Bezeich- 
nung stammt vom Autor des Spieles) genügend Chancen, Ihr Talent, 
als Broker unter Beweis zu stellen. 

Sechs Firmen bieten Ihnen Aktien an (je Ausgeber 500 Stück), wo- 
bei das Spiel in drei Schwierigkeitsstufen sowohl dem Börsenneu- 
ling als auch dem ausgefuchsten Jobber gerecht wird. 
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Nachdem Poke 44,28: Poke 7168,0: 
NEW eingegeben wurde und das Pro- 
gramm geladen ist, wird der’ ge- 
wünschte Schwierigkeitsgrad erfragt, 
dargestellt als das Ihnen zur Verfügung 
stehendes Startkapital (Anfänger 100.- 
DM, Kenner 50.- DM, Profi 10.- DM). 
Nun geben Sie Ihren Spielernamen ein 
(max. 7 Buchstaben), sodann erscheint 
das Hauptbild: 

500 Aktien von 6 Firmen mit einem 
Nennwert von 10.- DM/Stück stehen 
zur Verfügung. In der obersten Zeile 
des Bildes werden Spielzeit und Datum 
ausgegeben. Im Börsenindex steht un- 
ter "Firma” der Ausgeber, unter ”Kurs” 
der augenblickliche Wert und unter 
"TE" die Tendenz des Wertpapieres (+ 
steigend, o stagnierend, - fallend). Un- 
ter "BEM” (Bemerkung) können fol- 
gende Informationen stehen: 

Start: Fällt eine Aktie unter -.|0 DM 
bzw. steigt sie über 100.- DM, so wird sie 
wieder auf ihren Nennwert zurück- 
gesetzt. 

Zero: Dem Spieler wird mitgeteilt, daß 
eine Aktie kurz vor der Entwertung 
(rücksetzen auf Nennwert) steht. Dies 
geschieht wenn eine Aktie mehr als 60.- 
DM bzw. weniger als 1.10 DM wert 
ist. 

Share: Keine Aktien der betreffenden 
Firma sind mehr zu kaufen. 

Darüber hinaus verfügt unser Spiel 
über ein Infosystem, das bestimmte In- 
formationen durch einen Gongankün- 
digt und aufden Bildschirm bringt. Die 
Textmeldungen dieser Routine erklä- 
ren sich von selbst. Das Infosystem 
zeigt den derzeitigen Bargeldstand so- 
wie den augenblicklichen Gesamt- 
aktienwert an. 

Unsere Börse ist sicherlich nicht eine 
der größten, wenn wir die Umsätze be- 
trachten; sie ist aber komfortabel aus- 
gestattet und verfügt über eine 
cursororientierte Anwahlmöglichkeit 
für Hilfsroutinen: Auswahl mit SPA- 
CE, auslösen mit RETURN. 

Wählen Sie das “Telefon“, so erfahren 
Sieumgehend, wieviel Geld und Aktien 
gerade investiert sind, - 

wählen Sie den "Hammer", haben Sie 
Zugang zum Geschäft. Aus einer Index- 
liste lesen Sie die noch käuflichen 
Aktien und den eigenen Firmenanteil 
ab. Durch SPACE können Sie in 
diesem Fall die einzelnen Firmen an- 
steuern. Drücken Sie RETURN, so wer- 
den Sie nach der Aktienmenge gefragt. 
Ist der Verkauf abgeschlossen, geht Ih- 
nen selbstverständlich eine Rechnung 
zu, die auch Auskunft über Ihren 
aktuellen Kontostand gibt. 

Hinweis: "Hammer” + V bedeutet Ver- 
kauf, ”Hammer” + A bedeutet 
Ankauf. 

Help: Mit dieser Funktion lassen sich 
drei Hilfen aktivieren... 

a) Aufnahmeeines Kredits von 50.- DM 
(nur möglich, wenn Ihr Kapital kleiner 
als 10.- DM ist) 

b) Tilgung des Kredits 

c) Ausspielen der "Sharebreak-Karte” 
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PRINT "BREE* SHAREHOLDING **" 
PRINT"WBBIEOPYRIGHT MI '84" 
PRINT" EREBBIFRANK MUELLER" 
PRINT"ERRBBFFOLKERSBECK 38" 
PRINT'EERBRBH 300 ESSEN 1" 
PRINT"WITEL.:B2 B1/71 47 48" 
PRINT" EREEEEBITTE WARTEN! !" 
POKE44 ,28:POKE36869 ,285 
FORH=®T02047:POKES120+H ,PEEK (32768 +H) :NEXTH 
FORH=®8TO 22 :READAA 
FORK =8T07 :READAB : POKEAA+K ‚AB: NEXTK :NEXTH 
DATA 5648 ‚236,168,168,8,8,14,8,8 
DATA 5656 ‚82,90,78,112,76,67,64,64 
DATA 5664 ‚8,98,1,3,7,15,31,7 
DATA 5680 ‚0,0,128,192,224,248,248,224 
DATA 5688 ‚7.7,7,7,7,7,8,8 
DATA 5696 ‚224,224 ‚224 ,224,224,224,0,8 
DATA 5784 ‚160,160,160,168,160,128,252,0 
DATA Seas ‚138,130,134,24,96,128,0,8 
DATA 5824 ‚6,26,98,130,18,154,218,178 
DnTA 5840 ‚0,240,76,67,88,84,82,82 
DATA 5896 ‚8,8,0,0,0,14,168,168 
DATA 5928 ‚0,0,0,0,0,255,255,255 
DATA 5976 ‚8,8,7,7,7,7,7,7 
DATA 5984 ,‚4,3,8,31,63,63,127,48 
DATA 6000 ‚B,224,252,252,30,206,46,16 
DATA 6016 ‚8,7,63,63,128,115,116,8 
DATA 6824 ‚7,31,15,7,3,1,8,8 
DATA BASE ‚224,248,248,224,192,128,0,8 
DATA 6048 ‚9,0,224 ‚224 ‚224,224 ‚224,224 
DATA 6048 ‚0.64,96,112,120,248,248,248 
DATA 60856 ‚120,120,128,8,252,8,252,0 
? DATA 60864 ‚0,60,34,162,162,188,160,160 
DATA 6184 ‚32,192,16,248,252 ‚252,254, 12 
AECO)="+GUTE HANDELSBILANZ BEIHSTREIK BEI+" 
AS(1)="SHARE-BREAKING! DER GEGNER VERLIERT 58% SEINER MONOPOLAKTIEN, WENN SIE 
DIESE" 
92 ASs(2)=" KARTE AUSSPIELEN.«" 
93 AS(3)="SCHWÄRZER FREITAG! SIE VERLIEREN 58% IHRES BARGELDES.* 
94 A$(4)="+SCHWARZER SAMSTAG! SIE VERLIEREN 58% IHRER AKTIEN. * 
188 A=4649:FORH=OTOA 
118 FORK=ITOLENCASCH) ):POKER ,ASC(MIDSCASCH) ,K, ID) :A=A+LENEXTK,H 
128 PRINT"WOK. LADEN SIE NUN BITTE DEN 2.TEIL EIN.* 
100 POKE36869 ‚205: POKE36879 ‚24: PRINT " LAMEMRENKIEN" > TAB<E) 7 "IIVC-20 +16Km" 
118 PRINT"ERI"TAB<S)> "MEHAREHOLDING" 
128 PRINTTAB(3)5 "MEIN ADVENTURE UM" 
138 PRINTTAB(4); "IBELD UND MACHT" 
198 SIs="—mm |":S25=" HIBMH" 
158 FORH=9T019 
160 PRINT" ieReietpen" SPC CH» "I m DA" S2$ 
178 PRINT " SICIKICDARTETEIETEN" SPC C2O-H): "BI Em CRMMEA* 7 Sı$ 
160 POKE36878,, 15: POKE36876, 160: FORQ=8T05®:NEXT:POKE36876,0 
190 FORQ=2TO88:NEXTQ,H 


" 208 PRINT"COTERBBBNON F.MUELLER" 


210 FORH=0T05980:NEXT:GOSUBSBRO® 
220 ANSCI)="ARAL" :ANSCE)="SHELL" EANSC3) =" IBM" LANSC4I="SABA" LANSCSI= "VW TANSCGI=" 
BMW" 

230 FORH=1TOG:AKCH)=1O:ATSCHI="O"AMCH)=SOB: NEXT 

235 WACO)=.85:WAC1)=.1:WAC2I=.15:WAC3I=.2:WACA)=.25 

240 TI$="008808":TA=1 

250 GOSUB260:60T0508 

260 PRINT" :G0SUB60B9B : GOSUB4AB:GOSUBI2O8 

298 PRINT"ETI BOERSENINDEX FIRMA: KURS: TE: BEM: "3 

308 PRINT"Messesensunnnnnnnnzennnt, 

318 FORH=1T06:PRINTANSCHIEPRINT"O" 7 TABC7) AK CHI PRINT"O"FTABCIAIFATSCH) 

3298 PRINT"D"FTABCIEIFABSCH) 

3398 IF<HI/A=INTCCHI/BITHENPRINT * 

348 NEXT:PRINT"De=====@s0sunnennnnunnnt 

358 PRINT"H INFOSYSTEM: “ 
360 PRINT"Me=======2uununneununen 

378 PRINT*M"FtFORH=1TOIBSTEP4:PRINTTABCHIF" —— MEMEN| 
NEXT 

380 PRINT" EEREE EHEM DI" 7 "EREA I FRI DD" > "BER | NEM DI" > "BREER KEY" 7 "RI" SIE "1": 
GOSUB7E8 

390 RETURN 

ABO FORH=ITOB:ABSCHI="" 

418 IFAKCHI=1OTHENABSCHI="START" 

420 1FAKCHI<LORAK CH) >GOTHENABSCHI="ZERO" 

438 IFAMCH)=BTHENABSCHI="SHARE" > 

448 NEXT:RETURN 

508 REM SPIELER I 

510 PRINT" allelsteteefetefeleleletetsiekg" 3 %$5 "ME BAR: "SXK3 "DM" PRINT"D" 3 FORH=1TOLENCKS) EPRINT 
Dr 

515 NEXT:S=@:CC=®:X=®:FORH=1TOB:X=X+XACH)#AKCHI:NEXT 

528 PRINT"WANL:"3%7 "DM" 

525 PRINT "eleleleisteleieteggetegelegetetg" SPC (2+C5+4) 75287 "DID* 

538 GETAS:CC=CC+H 

S21 IFCC=1OTHENPR INT " Uusgelelepetegegeregrleieleleis]" 3 x$ 

532 IFCC=28THENPR INT * zämsgelrfefetsiefegrieteteteletel" ? %$ 

533 IFCC=2OTHENCC=O 

534. IFA$=" "THENGOSUB60988:: 6010538 

548 IFASC (AS) = 12THENGOTOSSO 

SSO PRINT "Sietskeletefefstelegekegezekentete]" SPC (2+CS+4)5" UM 


Tamm mE — DON": 


":CS=CSt+1 
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(siehe Kurzanleitung zu Spielbeginn) 
Passen: Wenn Sie das Spielan den Geg- 
ner abgeben wollen, ohne etwas getan 
zu haben, wenn Sie an der Reihe 
sind. 

Das Spiel endet, wenn entweder ein 
Spieler bankrott oder Besitzer von 
100.000.- DM in bar ist. 













Technische Daten: 
"Shareholding” besteht aus zwei Pro- 
grammteilen von je IK Byte und 15.5K 
Byte Länge. 

Gliederung des Vorprogrammes: 

Zeile 0 - 74: Umladung des Zeichensat- 
zesins RAM, Definition neuer Zeichen 
mittels Data Statements 

Zeile 90 - 120: Definition der 
Informationen 

Gliederung des Hauptprogrammes: 
Zeile 100 - 250: Initialisierung der 
Variablen 

Zeile 260 - 440: Aufbau des Haupt- 
bildes 

Zeile 500 - 560: Warten und Ausgabe 
der Aktien des 1. Spielers 

Zeile 600 - 910: Berechnung der 
Aktienkurse, Erstellung und Ausgabe 
der Zusatzinformationen 

Zeile 1000 - 1100: Warten und Ausgabe 
der Aktien des 2. Spielers 

Zeile 10000 - 10330: Ausgabe der 
INFO-Routine 

Zeile 20000 - 20320: Ausgabe der 
VERKAUF-Routine 

Zeile 30000 - 30430: Ausgabe der 
ANKAUF-Routine 

Zeile 40000 - 41000: Ausgabe der 
HELP-Routine 

Zeile 50000 - 50100: Einleitung 
Zeile 60000 - 60020: Uhrroutine 
Zeile 60100 - 60140: Tendenzroutine 
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IFCS=STHENCS=8 
GOTOS25 
568 ONCS+1G0SUB 10000 ‚28000 ,38008 , 40808 
888 GOSUB618:G60T01988 
618 POKE36879,24:PRINT'M 1=INTERND«C19#5)122=INTCRNDCIIKE)HLERTSRTHLEYTSYTH1 
628 IFZ1>.2THENGOTOSS® » 
638 25=AA(Z2):FORH=1TOB:AACHI=AACHI-WACZIY 
648 29=H:G0SUBEB 188 
845 NEXTH:AA(Z2)=Z5:AA(ZEI=AACZEI+WACZI) 
848 29=22:G0SUB68190:60T0688 
S® Z3= INTERNOC1)KSI124=INTCRNDCI)K6) +1: IFZ4=Z2ZTHENGOTOSS® 
868 AA(Z2)=AA(Z2I+WACZIITAACZAI=AA(ZAI-WACZSI 
655 29=22:605UB60109:29=24:G0SUB60 198 
688 FORH=1TOB:AK CH) = INTELAK CHI HAK CHI KAACH)IH1OI/1O 
685 IFAK CHI <=. 1 THENAK CHI =1O:KXACH) =D: YACH) =WTAMCH)=SBB:AACHI=B:ATSCHI=- "Mom" 
698 IFAK CH) >99THENAK (HI =1B:XACH) =D: YACH) =D:AMCH)I=SOD :AACHI=D:ATECH)= "om" 
695 NEXT:GOSUB269 RETURN 
788 IFRNO(1)<.8THENRETURN 
a2 POKE36876,195:FORH=1STOBSTEP-I 
794 POKE36878,H:FORQ=9TO1O:NEXTQ,H 
706 POKE36876 ‚201 tFORH=1STOOSTEP-1 
787 POKE36878,H:FORQ=8TO19:NEXTA,H 
708 FOKE36876 ,207:FORH=1STOBOSTEP-1 
799 POKE36878 ,H:!FORQ=8TO39 :NEXTQ,H 
718 21=0:22=0:K0$="":H=Q: IF CRK< LODODORKK < 1OBBO)ANDRND (1). BTHENGOTO73A 
715 IF(XK)=100880RYK >= 10889 JANDRND( 1)<.ETHENGOTO738 
728 Z1=INTCRND(1)%3) +2: FORQ=4649T04882: IFPEEK (QI<>SSTHENNEXT 
738 IFZ2<C>ZITHENZ2=Z2+1:NEXTO 
748 Z1=Q+1:FORH=Z 1T04882: IFPEEK CH) =95THENGOTO7S2 
758 KO$=KOS+CHRSCPEEK (HI) NEXT 
752 IFZ2=2ANDS=OTHENYB=I 
75° IFZ2=2ANDS=ITHENXB=I 
756 IFZ2=3ANDS=OTHENYK=INT(CYK/2> 
758 IFZ2=3ANDS=1THENXK=INT(XK/2) 
7608 IFZ2=4ANDS=BTHENFORH=1T06:23=YACH) EYACHI = INTETACHIZ2EI EAMCHI =AMCH I +ZI-YACHIEN 





762 IFZ2=4ANDS=1THENFORH=1T06:23=XA CH) EXACHI = INTCKACHIZ2I EAMCHI =AMCH I +Z3-KACHIEN 


77® 1FZ1=2ANDS=OTHENXB=1 

788 G0T0838 

798 Zi=INTCRND(1)*2):FORQ=4649T04882: IFPEEK <Q)< >SSTHENNEXTO 

898 IFZ1<>Z2THENZ2=Z2+1:NEXTO 

818 ZI=Q+1:FORH=2 1T04882: IFPEEK (H)=9STHENGOTOB30 

828 KOS=-KOS+CHRSCPEEK (HI) ENEXT 

830 IFZ2=BTHENGOTOBAB 

832 IFZ2=1THENGOTOBSO 

834 G0TO868 

840 ZI=INTCRNDC1)KB)+LIKOS=KOS+" "HANSCZIITAACZII=AAGZII+.25:29=2 11G0SUB6A1OD 
845 KO$=KO$+". DER KURS WIRD DAHER STEIGEN. ":60T0860 

858 ZI=INTCRNDCI)KG)+I:KOS=KOS+" "HANSCZIILAANCZII=ANCZII-.25:29=21:G0SUB6A 100 
855 KO$=KO$+". DER KURS WIRD DAHER SINKEN. " 

860 IFS=OTHENKOS=YS+": "+K0$:60T0889 

870 KOS=X$+": "+Kos 

880 Kos=" "+KOS:KO$=KOs+" " 

898 FORH=1TOLENCKOS) :PR INT " Selefsteletnirtetefetstetsinig" > MIDSCKOS,H,22> 

300 POKE36878,15:POKE36876 ‚240: FORJ=@T030:NEXT:POKE36876 ,0: 

918 FORJ=8TOSB:NEXTJ,HTRETURN 

18008 REM SPIELER 2 

1918 PRINT" äisfelekeleletefetekt-TeleTeiegn" 3 Y$3 "m: BAR: "3 YK "DM" EPRINT"D" 3 :FORH=ITOLENCYSIPRIN 
4 EEE 

1815 NEXT:CC=B:Y=O:FORH=1TOB:Y=Y+YACHDKAKCHI NEXT 

1828 PRINT"BANL:"FY3 "DM":S=1 

1025 PRINT " SICLRsTeleisteirIckeXistetricell" SPC (2 +CS+4) 7526; "LIND" 

1838 GETAS:CC=CC+H 

1831 IFCC=1OTHENPR INT " BEESToBech EEE" > v5 
1832 IFCC=2OTHENPR INT " EERDTEDRTEDDETEN" 7 Y$ 
10833 IFCC=2BTHENCC=® 

1834 IFA$=""THENGOSUB69908:G0T01030 

10840 IFASC(AS)=13THENGOTO196B 

1850 PRINT "gelrkelnistereteiwisteteteregetele]" SPC C2+CSRA) 3" 
1053 IFCS=STHENCS=® 

1055 60T010825 

1068 ONCS+1G0SUB10000 ‚20000 ‚30000 ‚40000 
11090 GOSUBS18:60T0518 

1208 REM FEHLER 

1218 IFXK<IANDXC=ITHENKL=1:G0T01308 

1228 IFYK<1ANDYC=1THENYL=2:60101384 

1230 IFXK)1OOB08OTHENI480 

1240 IFYK>180098THEN1408 

1250 RETURN 

1388 FORH=1T06 

1301 IFXACH)<>OTHENRETURN 

1382 NEXTH:S=8:6070131® 

FORH=1TO6 
IFYA CHI < IOTHENRETURN 
1306 NEXTH:S=1 

1318 PRINT — el 
1328 PRINT" I-XI IX 
1338 IFS=OTHENPRINT"==========---e-snenne=}BEHR GEEHRTER "3%$:607101348 

1335 PRINT"=== SBEHR GEEHRTER "3 Y$:60T01348 

1348 PRINT"EWUR MUESSEN IHNEN MIT-NTEILEN, DASS SIE NICHTMEHR AN DER BOERSE" 
1358 PRINT"MSPEKULIEREN DUERFEN. "PRINT "IeBRBRRBRBIHRER . MCGE 12 SER 
1398 END 
REM 








zum ":CS=CS+i 


DIE BANK 1081" 
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1418 PRINT rn el DIE BANK je@I" 

1428 PRINT" IXI I-Xl von GEIZ oo" 

1438 IFS=ÖTHENPRINT"============0=2e=0@n=s8BEHR GEEHRTER" 7X$:G0T01448 
1435 PRINT"======================3 SEHR GEEHRTER" Y$:G0T01348 

144® PRINT"WBIE HABEN DAS ZIEL DIESES SPIIELS ERREICHT" 

1458 PRINT"SIE ERHALTEN SOMIT DIEMAUSZE ICHNUNG: * 

1468 PRINT"NEBBI'KOENIG DER BOERSE'" 

1478 PRINT"!BRRBIIHRER . MCGE 12 CURRRBRRNI========j" 

1488 END 

3888 REM ANKAUF 

10008 REM INFORMATION 

18018 POKE36879 ,28:POKE36869 ‚285 

10028 PRINT" a) "3EPRINT" 

18838 PRINT" «INFO Mel xINFOx "5:PRINT" 

18048 PRINT"========@sennennmenennt;t IFS= I THENGOTO10208 

18850 PRINTX$7"'S KONTOSTAND: ":PRINT"EBAR: "3 XK7 "DM" :PRINT"EAKTIEN: " 
18068 FORH=1T06: IFXACH)=OTHENNEXTIPRINT"KEINE AKTIEN“ :GOT0198888 

18862 PRINT"STK FIRMA KURS: PREISi=====ee@ennnnnnnnnnnent, 

1080708 FORH=1TO6: IFXACH) =OTHENNEXT:GOTO 10088 

18875 PRINTRIGHTSCSTRSCKACH)) ‚LEN(STRSCKACHIII-1D 

10088 PRINT"ERBBBI" XASCH) :PRINT"ORRBRRRBBBI" AK CH): PRINT"CRRRPRERBPBRBARAN" ;XACH)x 
AKCH) 

10085 NEXT \ 

18098 PRINT"========emannnennenenents IFXC=ITHENPRINT"NASIE HABEN EINEN KREDIT“ 
18895 IFXB=8THENGOTO 10388 

18188 PRINT"SAUSSERDEM HABEN SIE 1 SHARE-BRAEK KARTE." 

18118 IFXV<@THENGOTO 18388 

108130 G0T0108388 

182088 PRINTYS:"'S KONTOSTAND: "PRINT" BAR: "3 YKy "DM" EPRINT"SAKTIEN: * 
18282 PRINT"STK FIRMA KURS: PREISi=====nnnmnnnnnunnunnen, 

10218 FORH=1T06: IFYACH)=BTHENNEXT:PRINT"KEINE AKTIEN" :GOT018248 

10228 FORH=1TO6: IFYACH)=OTHENNEXT:GOTO19248 

18225 PRINTRIGHTSCSTRSCYACH)Y) ‚LENCSTRECYACHIII-1) 

18230 PRINT"DIBBBI"  YASCH): PRINT "CRBBABBERBI" ; AK CH): PRINT "CRRBRRRRBPRRRBBBI" ; YACH)* 
AKCH> 

10235 NEXT 

10248 PRINT"==========u0nu000n00nne tt IFYC=HITHENPRINT"IBBIE HABEN EINEN KREDIT" 
18245 IFYB=OTHENGOTO 10388 

108250 PRINT"AUSSERDEM HABEN SIE 1 SHARE-BREAK KARTE." 

19388 PRINT " Sgelstetelstefepoxeisgefetelstetetetrietel-BITTE TASTE DRUECKEN-* 

108320 GETAS: IFA&=""THENGOTO10328 

18338 PRINT"Q" RETURN 

28080 REM VERKAUF 

20818 PRINT"U"> :POKE36879,,29:02=® 

20020 PRINT" —! 


20838 PRINT" mim" 
208040 PRINT" VERKAUF & IBM IXVERKAUF K" 7 
28858 PRINT" SO" IPRINT"=a=sennennnannnnnnnnnnt} HG0SUB3OOGDO 


20068 PRINT"WAS WOLLEN SIE VER- KAUFEN? (SPACE)" 

28878 FORH=4228+22xC2 T094249+224C2 :POKEH ‚PEEK (HI +128:NEXT 

20088 FORQ=OTO 19B:GETAS: IFAS=""THENNEXT 

208098 FORH=4288+224C2 T04249+224C2 :POKEH,,PEEK (H)- 128: NEXT 

281088 FORQ=OTO 188: IFAS<>" "THENGOTO291 18 

281085 GETA$:NEXT:GOTO20078 

20118 IFA$=" "THENCZ=C2 +1: IFCZ=6THENCZ =8 

28128 IFAst>" "ANDAS<C)""THENGOTO28135 

20138 GOTOEOR7O 

28135 C2=C2 +1: 1F5=1THENGOTO298288 

20140 IFXA(CZ)=BTHENPRINT"SIE BESITZEN KEINE "3ANSCCZ 3 "AKTIEN!" :FORH=8T02088 
INEXT:RETURN 

28158 PRINT"CRWIEVIEL VERKAUFEN SIE?*: INPUTZI 

28168 IFZ1>XACCZ )THENPRINT"ORBOVIEL HABEN SIE NICHT" :FORH=8T02088 :NEXT:RETURN 
28178 22=XK:FORH=44084T046082 :POKEH ‚32 NEXT: FORH=8T02088:NEXT 

20188 XK=XK+Z 1x#AK (C2 ) :GOSUB38275 :AM(CZ I) =AM(CZ I +Z 1 :XACCZI=KACCZ)-Z1:PRINT"BAR NEU 


©8198 PRINT'TRBRRBPPPEBI" ; xK; "DM":GOT028308 

20208 IFYACCZ)=BTHENPRINT"SIE BESITZEN KEINE "HANS CCZ )5 "AKTIEN!" :FORH=8T02008 
INEXT 

20205 IFYACCZ)=OTHENRETURN 

28218 PRINT"CIWIEVIEL VERKAUFEN SIE?": INPUTZI 

28220 IFZ1>YACC2)THENPRINT"ERBOVIEL. HABEN SIE NICHT" :FORH=8T02888 :NEXT:RETURN 
20238 22=Yk:FORH=4484T04682 : POKEH ‚32 :NEXT: FORH=0T02888: NEXT 

20248 YK=YK+Z1#AK (CZ ):GOSUB30275:AMCCZ J=AMiCZI+Z 1: YACCZI=YACCZI-Z1:PRINT"BAR NEU 
20250 PRINT "CRRBBRPPBERI' ; YK; "DM" 

20300 AA<CZ)=AA(CZ)-2 1/1808: FORH=OTO2BBB:NEXT 

20305 PRINT " SAdeIegelskstexcketeiefefeietsieteleieil-BITTE TASTE DRUECKEN- 

28318 GETAS$: IFA$=""THENGOTO20318 

20320 RETURN 

29008 END 

30000 REM ANKAUF 

30018 PRINT"Ü"> :POKE36879,30:C2=8 

saa20 PRINT“ un" 

30838 PRINT" mim" 

38848 PRINT"xANKAUF* IBARE| KANKAUF«" n 

38858 PRINT" SO HHPRINT*==== GOSUB39969:60T0390198 
38868 RRINT"ST: EA: FIRMA PREIS: "; 

38878 FORH=1T06:PRINTRIGHTSCSTRSCAMCH) ) „LENCSTRECAMCHYII-1) 

38075 IFS=ITHENPRINT"ERBEBI" /RIGHTSCSTRSCYACH)) „LENCSTRSCYACHYI)-1):G0T0398888 
30076 PRINT"ERBBRI" RIGHTSCSTRECKACHY) „LENISTRSCKACHYI)-1) 
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20082 PRINT" RRBBRBBBI" ; ANSCH): PRINT" ORRRBRPRRPRBBBI" ; AK<CH) > "DM": NEXT 

38898 PRINT" RETURN 

301088 PRINT"SIE KOENNEN AUSGEBEN: ": IFS=8THENPRINTXK 5 "DM. ":22=XK :G0T038118 
38105 PRINTYK3 "DM. ":Z2=YK 

30118 PRINT"WWAS KAUFEN SIE?":PRINT" SPACE)" 

30128 FORH=4228+22xC2 T04249+224C2 :POKEH ‚PEEK (H) + 128: NEXT 

390138 FORQ=8T0189:GETAS$: IFAS=""THENNEXT 

30148 FORH=4223+224C2T04249+22xC2 :POKEH ‚PEEK (H)-128:NEXT 

30150 FORA=OTO1BA: IFASC)" "THENGOTO38160 

38155 GETAE:NEXT:GOTO39 128 

30160 IFAs=" "THENCZ=CZ+1: IFCZ=6THENCZ =® 

38178 IFASC)" "ANDAS< >" "THENGOTO3B18S 

30180 GOTO3B1E2B 

30185 FORH=4228+22+C2 T04249+22xCZ :FOKEH,PEEK (HI + 128: NEXT 

38198 CZ=CZ+1:PRINT"ORMIEVIEL AKTIEN?": INPUT" mm“ :2 1 

30288 PRINT"EIBIE WOLLEN" ZI" "zANSCCZ) 

38218 PRINT"AKTIEN HABEN. RICHTIG?" 

30220 FAs=""THENGOTO30228 

30230 "N" THENGOTO39988 

30235 IFZı>AM(CZ )THENPRINT"DAS SIND ZU VIEL AKTIEN. ":RETURN 

30240 IFS=1THENGOTO3389 

20258 IFXK<Z1%#AK CZ ITHENPRINT"AKTIEN SIND ZU TEUER. ":FORH=®T02588:NEXT:RETURN 
38268 PRINT"OK. ICH KÄUFE.* 

30278 KXK=xK-Z 1#AK (CZ) ERASCCZ I=SANSCCZIEKACCZI=KACCZ I+ZIEAMCCZ )=AMCCZ )-21:G0SUBSDE 
75 

308272 G0T0O38292 

30275 PRINT" ERWERBER TE ABRECHNUNG : 

30288 FORH=4404T04582:POKEH ‚32:NEXT 

30285 PRINT"WBAR ALT: ":PRINTORRBRRRPBBRI" ; 22; "DM" 

38288 PRINTAN$CCZ)3 ":":PRINT " ORBMBBEBBEE" ; 2 1 «AK CZ); "DM“ 

30298 PRINT"=========50======@" RETURN 

398292 XK=INT(XK#18)/18:PRINT"BAR NEU: *:PRINT "OOERRERBRRBEI" ’xK; "DM" 

30294 FORH=0TO2OR8:NEXT:GOTO30488 

30300 IFYK<ZI#AKCCZITHENPRINT"DIE AKTIEN SIND ZU TEUER. *:FORH=8T0258®:NEXT:RETUR 
N 

3831® PRINT"OK. ICH KAUFE." 

30328 YK=YK-Z 1#AK (CZ): YASCCZ I=ANSCCZ I: YACCZI=YACCZI+Z 1 EAMCCZI=AMCCZ)-Z1 
30338 PRINT" OBmp TE ABRECHNUNG : Lv 

30348 FORH=4404T04682 :POKEH,32:NEXT 

30350 PRINT"IBAR ALT: ":PRINT"ORREBBRBBEBI ; 227," DM" 

38360 PRINTANSCCZ)":": PRINT" RRMBEIBII" ; 2 1 «AK CC2 ) 5 "DM" 

38378 PRINT"======enuneanennn" 

38380 YK=INTCYK*1O)/198:PRINT"BAR NEU: "PRINT " DOREEN" ; YK > "DM" 

30398 :FORH=8T02888: NEXT 

30490 AN<CZI=AAICZ)+21/1908 

390418 PRINT " ERRERRUTTERRUUETETRRIEN- BITTE TASTE DRUECKEN-M" 

30428 GETAS$: IFAS=" "THENGOTO39428 

30438 RETURN $ 

40080 REM SONDERKARTEN 

40010 POKE36879,26:PRINT"M" :GOSUB48408: IFS= 1 THENGOTO48208 

48020 IFXB<>1THENRETURN 

40038 FORH=1TOB: IFYACHIK2SOTHENNEXT:RETURN 

48848 XB=:PR INT " umMUHRDETUEENNK«* SHARE -BREAK ING ERS ORERRRORREORRROR" 
48050 POKE36878, 15: FORH=8T058:POKE36876 , INT(RNO(1)*100) +148: FORQ=BTO3SB:NEXTA,H 
40068 POKE36878 ,D:FORH=1T06: IFYACH) <2SOTHENNEXT:GOTO39088 

40078 ZI=YACHITYACHI=INTENACHIZEILAMCHI=AMCHI+ZI-YACHI:KB=B:NEXT:GOTO30008 
40288 IFYB<>ITHENRETURN 

40218 FORH=1TOS: IFXACHIKZSOTHENNEXT:RETURN 

40228 YB=D:PR INT "UÜUULLUERTEUUIRK KK SHARE -BREAK ING ERRRRORRRRORRORRER" 
40230 POKE36878, 15: FORH=OTOSQ:POKE36876 , INT(RNOC1)*108)+148: FORQ=®TO3B:NEXTG,H 
40248 POKE36878 ,B:FORH=1T06: IFXA CH) <2SOTHENNEXT:GOTO3H0B8 

40258 Z1=XACHIEKACHI=INTEXACHI/2D EAMCH)SAMCHI+ZI-KACH) :NEXT:YB=0:G0T030808 
48488 PRINT"U on 

40418 PRINT" IM sl HILFE Im m" 

48428 PRINT" Ieem Imeomı" 

40438 PRINT" —) FUER SIE! —" 

48448 PRINT'====unnennnununnnnunnnt; 

40450 PRINT"DIESE MITTEL STEHEN IHNEN ALS HILFE ZUR VERFUEGUNG: * 
40468 IFS=BANDXB= 1ORS= IANDYB= ITHENPRINT"KA. . „SHARE-BREAK * 

40470 IFS=OANDXC=OORS= IANDYC=BTHENPRINT"IB.. .DARLEHN VON 58 DM* 

48475 IFS=DANDXC=1ORS=1ANDYC=1THENPRINT"MC...TILGUNG DES DAR- 

40438 PRINT"MEITTE WAEHLEN SIE!" 

40490 GETAS: IFA$="A"THENRETURN 

aosaa IFAS="B"THENGOTO4B6BR 

40518 IFAS="C"THENGOTO48790 

48519 GOT040438 

40608 IFS=1THENGOTO496SO 

Aa6 1AWIFXK > LOTHENRETURN 

40628 FORH=1TO8: IFXACH)<DOTHENRETURN 

40630 NEXT:IXC=1:XK=XK+SO:XT=B:RETURN 

48650 IFYK>LOTHENRETURN 

40660 FORH=1TOB: IFYACH)<>OTHENRETURN 

40678. NEXT: YC=1:YK=YK+50: YT=O:RETURN 

aaraa PR n  1e#l DIE BANK el" 

ao701 I=X1 0. von GEIZ 2" 

48782 PRINT"== == Er; 

48784 PRINT"EEMBI««* TILGUNG *+*" PRINT 

48785 IFS=1THENGOTO498088 

48783 IFXK<SO+XT#IOTHENPRINT"ERBBIRNICHT MOEGLICH! ":RETURN 

48718 PRINT"BAR ALT: "FXK 

48728 PRINT"TILGUNG: "XT*18+50 

48738 PRINT" 
48748 KK=XK-SO-KT+1O:PRINT"BAR NEU: "HXK:FORH=OTO2B9B8:NEXT 
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40758 PRINT" EDERUOTULLERUTETETERM-BITTE TASTE DRUECKEN-" ’ 
40768 XC=9:GETAS$: IFA$=""THENGOT049768 

48778 RETURN 

40808 IFYK<S®+YT+1OTHENPRINT"ERBISNICHT MOEGLICH! ":RETURN 

48818 PRINT"BAR ALT: "zYK 

40828 PRINT"TILGU YTx10+50 

48838 PRINT"=== seunoer 

40840 YK=YK-5®-YT+1O:PRINT"BAR NEU: "3 YK:FORH=0T02980:NEXT 

488598 PRINT " ROURTRURTENBEDEUTERTEN-BITTE TASTE DRUECKEN-" / 
40850 YC=B:GETA$: IFAS=""THENGOTO40868 

48878 RETURN 

aieaa END 

SORA® REM ANLEITUNG 

SOaIO PRINTURK*H* SHAREHOLDING *+*+":PRINT"IERERERBIE SIND: " 

ANFAENGER" PRINT"... KENNER" :PRINT"E®....PROFI" 

"THENGOTOS003® 

ORVAL (A$) J3THENGOTOSBRO® 














SBa48 IFVAL(AS) 


SE05® FRINT"TERBEBI . SPIELER: URENRENBENI- =========": INPUT"BBBI" XS: IFLEN(KS) IETHEN 
RUN 
SO060 PRINT "TIEREEBE . SPIELER : ERRERNEREEI- =========": INPUT"BMBI" > VS: IFLENCYS) ETHEN 
RUN 


50878 Z1=VAL(A$):IFZI=1THENXK=1OD: YK=XK 

50888 IFZ1=2THENXK=58: YK=XK 

50098 IFZ1=3THENXK=1@:YK=18 

58188 S=B:RETURN 

68088 REM UHRROUTINE 

600085 PRINT"MIDT: "TA "M.06.84 2T:" 5 

soo1Ia IFVAL(TIS)>2A4BBTHENTIS="000888": TA=TAtı 

88028 PRINTVAL<MIDSCTIS,3,2))> "WE "HRIGHTSCTIS,2)5" ":RETURN 
60188 REM TENDENZ 

6B110 IFAA(ZI)YATHENATS(ZI)=" 
SE120 IFAA(ZI)=BTHENATS(ZB) 
59130 1FAR(Z3)<OTHENATS(Z9)=" 


ser. > 


für den VC-20 mit 3K-Supererweiterung 















A PÜKE: 

POKESE OKESE, 22: 

a PRIMT"TDAO EITTE WARTEN 

GOSLIB1 RE: PRINTCHRSC1423 

PRINT"IN PRISM 7 PROGRAMMS 

PRINT" 

PRINT" PRESEHTS 

PRINTCHREC14) 

PRINT" Dam 

FRINT"IMB! 

PRINT'AM! 

FRIHT'" RB! GALLERY WM" 
” ag 







au 





PRINT" RIERAERIEEIEE TER 
PRINT AIBY PETER KLALUSS Ic) 
FRINT" AT FERENSCRROSFRRURFRORFROSDROSCROZROZMFINSC" 





Sie sind in einem Bergwerk und müssen 
Diamanten abbauen. Aber dafür ste- 
hen nur 2 Minuten Zeit zur Verfügung. 
Oft ist der Weg versperrt; Sie können 
dann die Hindernisse sprengen, aber 
besitzen nur Sprengstoff für 15 Spren- 
gungen, und jede Sprengung kostet 10 
Punkte. Ein gesammelter Diamant 
bringt 100 Punkte. 

Gesteuert wird mit dem Joystick. 





PRINT SIRBBENLE TUNG? JMD" 

BETA$: IFA$=""THEN278 

IFA$=" I" THENGCSLBESE 

PRINT" TIRDDDDTBISPIELSTAERKE?CI-55 
GETA$: IFA$=""THEN3QQ 
IFA$="1"THENY=288 





IFAS="S"THEN 
PRINT" TI! BBACHTUNG!" 
=1703966 NE#T 

[ 14): PRINT" 


‚aa TI$="anaa 
PRINT BONES" 
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PCKE2E: 

PRIHT" 
& A=IHTERHIELSETHE 
a FOR. on HERT 


F=INTERNDEIIKLLI+E 
>, FTHENPRINTTABEFS 0A" 





PRINT TINDOEN ; HS" PLNKTE-HT SCORE" GOSUR1A9M: TNPUT"DEIN NAME" 


PRIHNTCHREC 143 PRINT TIDONDDDDOEADIE ZEIT IST UM" 
2994: NEAT : GOTDESE 
PRIHTCHREC 143 POKE36879, 25: PRINT" TIOORDINBRBNTZERSCHELLT" 
POKE3ER77, 128 
2a FORZ=1STORETEP-. 5 
POKE3EA7E,Z 
NEXT: POKE36877 , 4: FORT=1 TC E9@: NEXT: GNTOESE 
PCk.E3E8?9,25:POKE198. 8: PRINT"TINSCORE" SC 
PRINT" MSPRENGUNGEN" ;5 
PRINT"IREIT:";MIDSCTIS. 4,19". "RIGHTSCTIE.2) 
PRINT" MEHI-SCORE=" HS" BY: PRBBRDN"7$ 
PRINT" MMNOCHMAL?CJF/ND 
GETA& : IFA$=""THENSER 
IFA$=" I" THEN29® 
PRINT" TIAMIIMRBITSCHUESS" :FORT=1T03008 NEXT :POKE36869, 248: PCIKESE, 29: END 
PRINT"TEEDU BIST IN EINEM" 
PRINT" MBERGWERK. UND MUSST" 
PRINT"MUTAMANTEN ABBAUEN. " 
PRINT" MDAZU HAST TU ZWEI" 
PRINT"MMINUTEN ZEIT." 
PRINT"MIST TIER WEG VERBAUT." 
PRIHT"WEANNST DU SPRENGEN" 
PRINT", ABER NUR 15 MAL." 
PRINT"MMDRLIECKE EINE TASTE!" 
GETA®: IFA$=""THENISO 
PRINT"TUEDER DIAMANT IST " 
PRINT"MIEG PUNKTE WERT." 
PRINT"MWBEI JEDER SPRENGUNG" 
PRINT"SMERDEN DAFUER" 
PRINT"MA PUNKTE HEGEZOGEN. " 
FRINT"BGESTEUERT WIRD " 
PRINT"MAIT DEM JOYSTICK," 
A PRIHT"MMDRUECKE EINE TASTE!" 
a GETA$: IFAF=""THEN1978 
A RETURN 
PRINT" SIZT4CDTEEEET4IDETEFDT3DT?D" RETURN 
FORI=ATIS#1E5 
POKES144+1, FEEKC327E8H15 


Iransonemnn 
SOSSEBESSH 


4#=2T037%8-1 


POKEG14441,% 

NE#TI: POKE3E869, 254 

DATAEB. 126. 255, 231,195, 129,129,129 
RETURH 
IATAI2®,58.168.94.168.80.168,64 
DATAB.1.19.21.42,21,19.5,1 


memmmmrrın 
SDMNENIN BL 





64 CPU \ September 1984 


Für alle die noch nicht genug haben, gibt es die Heftserie 
CPU & Homecomputer aus dem Jahre 83. 
GPU & HG bringen in jedem Heft bis zu 14 und 
mehr Programmlistings für ”USER” und 
'VID-KiIDs’”. 









Sie bekommen jedes Heft von Homecomputer & GPU für 4,- DM zuzüglich 1,40 DM Versandkosten. 
Sie.können aber auch die hier abgebildeten Hefte gesammelt zu einem Sonderpreis von 46,50 DM zuzügl. 6,- DM Ver- 
sandkosten in unserem Verlag bestellen. 

Bei Lieferung von 2 Heften betragen die Versandkosten 2,- DM, ab 3 Hefte 3,- DM und von 8 bis 13 Heften 6,-DM. 
Bitte beachten Sie bei Ihrer Bestellung: Die Lieferung erfolgt nur per Vorauszahlung des Rechnungsbetrages und der Ver- 
sandkosten auf unser Konto bei der Kreissparkasse Eschwege: BLZ 522 500 30, Kto.Nr. 45 22 934. 

Außerdem möchten wir Sie darum bitten, unbedingt bei Ihrer Bestellung die genaue Ausgabenummer des Heftes anzuge- 
ben (z.B. CPU 10/84). 

Dieses Angebot gilt nur solange der Vorrat reicht! Sollten bereits einige Hefte vergriffen sein, schicken wir Ihnen die noch 
vorhandenen Ausgaben zu (Restbeträge werden dann per Scheck vergütet). 


VcC-20 


GARBENE 


für den VC-20 m. 8K-Erw. 


Wenn Sie an ein wenig Gartenarbeit Spaß und überdies weder Wind 
noch Wetter zu fürchten brauchen, dürfte GARDENER 
genau das Richtige für Sie sein... 


-VNONNUAORN-O 


Br? 


93 


@ PRINT"TI'CHR®C8) :POKE36879, 8: DIMUC22) Spieles muß POKE 44,28:POKE 





















Das Programm arbeitet mit Tastatur-- Pflanzen mit Wurzeln dargestellt. Ihre 
steuerung, die innerhalb des Program- Spielfigur muß nun unter eine dieser 
mes erläutert wird. Blumen gehen und kann sie durch 
Sinn des Spieles ist es, als Gärtner Blu- Drücken der Taste X gießen. Bekommt 
men zu gießen und diesen soeinlanges eine Pflanze Wasser, steigt sie sofort in 
REM Leben zu ermöglichen die Höhe. Nun muß der Gärtner ver- 
REMM m Auf dem Bildschirm werden mehrere suchen, alle Blumen auf diese Höhe zu 
Bein EA bringen - sie wird während des Spieles 


m 3 
REMWROLAND SELZERM angezeigt. 
REMM [1 Das Game ist beendet, wenn der Bonus 
RITHR abgelaufen ist oder eine Blume 
} vertrocknet. ‘ 
REINE Vor dem Eintippen oder Einladen des 


GOSUB28088 7168,0:NEW eingegeben werden. 

PRINT"T' :POKE36881 ‚ 178: POKE36864, 11! R=1B: BN=5999 : PRINT"TISCHRE"SC 

PRINT" A" TAB« 13)" H8"HS : PRINT "' AOD TEeaIKSE"" 

PRINT" IBRBANBBEBONUS Scan 
a 






PRINT" MB! 
PR ENT!" SONDGONDNUNDONDEIEKDEDKDKDNIKUNDKDNDEDNDIE LK KK KK RK KR KK" 3 
POKE45?9, 152: POKE37888+483, 5 
PR INT "" AOADSNDNDIUNUNDEUNDEONENDINUNDIK CARE" 

L 






Chmnice" 
m" 





PRINT " OKT" : FOR T=1T07 : PRINT" IT] 
PRINT!" BOOTE" 
ACO=197: FORI=1TOS:ACTI=ACI-19+4: NEXT 
PRINT!" FOLKD" SPCERI" MARSIN" 
PRINT" BUTELNDNDAELRUNTKDKNLEDNDKUDEN" SPC CRD" RTT Um" 
PRINT !" AODKDANDEDDTNDEDNNDNDSONKDNDN" SPC RZ" aazv m" 
POKE36878,5 
FORI=1T05: YCIy=8: NEXT 
BURI=OTOE2 :UCD=32:NEXT:UCHEII:UCIW=16:UK11de1:UK129=3:UK139=5:10B)=45:UC14 
4 
FORI=179T038STEF-1:POKE36881 , I: NEXT 
IFRNDC1)>. 38THEN6O@ 
IFYELD>OTHENIFFCZII>OTHENIFYCIY>OTHENIFYC4I>OTHENIFYCSI>OTHENIGO 
EN=BN-10: PRINT" RUM" TABCLL>BN"N  ": IFBNEOTHEN9QG 
IFPEEK(1973=23THEN4G9 
IFPEEK« 1979=37THEN5@@ 7 
IFFEEK(197)=26THEN?09 
GOT0198 
R=R-.5: IFRCOTHENR=8: 6070415 
PÜKE365877 , 135: FOKE36377,8 
IFR/Z=INTCR>/ZTHENAS@ 
PRINT!" ERURAIRDISTDTSLDSTIKDTUN" SPC CR" mar " 
& PRINT" FRMDIHIRIEIHlHItEIISTRINTRTIE" SPCÖRO" Bgm " 
PRINT" FANDALEDTSTLSTSTEDNDLLINDIITN" SPLCR>" DEM ":GOTO1OR 
PRINT "" SEDMUSDEDSUUNTELAUSTSTRSUSISLKIKON" SPC CRD" mare" 
PRINT " SRMMBIAISISIRIBISTWIEIRTSDIDRIRLAFTRTN" SPCEROI" am " 
PRINT " SUMISDEDTAUSUSTKUTEDEDSORIKLSDSIKUN" SPEER)" RK ":G0TO1RA 
R=R+.5: IFRPL3STHENR=18:6070515 
POKE36377 , 183: FÜKE36377,8 
IFR/Z=INT{R>7ZTHENSSE 
PRINT" FARTSISTAISTSISTEIKTADUSTSTKSIKITERN" SPC. CR)" MAL. 
PRINT" SIRLADAISUELISIEISTATRLATSTEISIKDSIKIEHN" SECKRI" N! 


BI DB IRB] " NEXT 




















FRINT" SRRADAKISDIESTEIRTSTSUSTSORDENISRIKTIE" SPC ER)" ASP" :GOTO1AM 
FRINT" SÄRIMISIEISIETELEIRLEIUEIEIRDTEN" SPCCRD" MARS: 

PRIN EDODEOEDTADTEDLEIUTELTELNTEN" SP: CR >" EaATLl 

PRINT" SÄRIMTCOTEISIELBTSTEIRTKTSTSTELDSTEIRTN" SIE" m SSOTOLa 
D=1 2 BL 7,2 DER =Y(1M)-2.5: IFYCDIZOTHENLAG 


k E+A<19-22,32:A{DI=Al0)+22 
a IFPEEK(4996+A2D>=1S3THENIGR 
POKE3788S8+ACDI-22, 7: POKEIUFE+ACDI-22, 155 
a PÜKES7S83+ACT) 3: POKE4BSE+ACDI. 154: GOTO100 
IFRZ1THENSG 
IF<R+2374=1HT% CR+2) 74) THENR=R+1 :G0T0718 
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IFCR+S? /4=INTCCR+3?/4> THENR=SR+1 6010718 
IF<R+2.59/4=INT<£R+2. 59/4) THENR=R+1:GOTO71@ 
IFCR+3, 597’4=1NT € £R+3. 597/43 THENR=R+Z: sorarıa 
PRIHT " SISIAIRTATSORTATETSTHTRTRUSTSTEISTEEN" SFT CR 


2 PRINT" SORALSOERUTSTSTRLSURTETATRUTEISTRTEN 


PR INT" ROSRSDTRLKTRE 
POKE36876, 180: POKE36876, 
D=INTCCR+2I/4) :RSR-1: IFPEEKG4B9E+ACDI-44)>32THENGOSUBIISB:WCDI=FCD)+1:G0T018 


+10, 5: POKE4BIE+HAK DD , 33 ACDISALDI-22 
13-22, 7 :POKE4OIS+ACDY-22, 155 
„S: PÜKE4O36+ACD>, 1594: GOTO1AO 

258101 285TEP-5:FOKE36878, 15: POKE26874, 0 FORI=1TOSQ:NEXTI 
574,6: FÜRJ=1T038: NEHTI. GG: G0T09898 
TO18:POKESSSTE. 15: FOKE38374 , 230: FORQG=1T03B:: NEXTAQ 
378, 15: FOKE36874, 248 : FORQG=1T030: NEXTAR, G:POKE36374,8 

:FORF=1T03: FORC=ATI7 : FORK=ZSATOZ45STEI :FOKE36875, 8%: NEXT : FORL=OTOC 

NEXT :POKE7160+C. 8: NEXT, F : POKES6873, 9: SC= SC+HBN 
3STD170:POKESSS31 , HH: NEXT:GOTOZ1 


248, 243,248. 8, 248,248, 249,249 
DATA@.1.3,3,2, 19, 19,14 

TATA3E, 248, 156, 168, 238,239, 223,63 

DATAB,1,1,3,2:19,19,1 

IATH2S2, 2 x E 22-77 Sr 7 "seo 
DATA1S,31.127,1 

DATA, 128,128, 12 128.128,0 re ar 
DATAS. 31 4,54,54 


3 Data, 12 


IATAS, 31 


5 DATAB, 123,13 
5 DATA 


al? DATAR, 


1 
1 
1 
H 
1 
1 
1 
1 
1 


mE 


wand 
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8,108,108. 108 


Sun PEEKLSETSS hexr TFORTMISEKSTOLS448+7 :RERDA 
58+13: NEXT 


E: SOHT, 1PO: NEXT 
ÜKES120+1.PEEK(32788+1) :NEAT RETURN 
‚12,249, 243,245,8, 248,248, 231,243, 12, 19,6, 3,° 


4, 
3 


RETURN 
ERINT" TIERE NO-SCFT" :FOKEIEBEI. 205 
INT"RUB FRESENTS. 


< FÜR Leer" 
>» FÜR RIGHT" 
a FOR HIGH" PRINT" MOMEN FRESS SPACE" 


Hit" ; :HEHT 
5 L. 178: HEAT :FÜKESS4S+C , 254 NEXT 
THENLEUSS 


"WAIT A MOMENT" 


CPU 67 

















Teil 2 
der Serie: 


HARDCOPY 













HACKER 








COMPUTERBEGRIFFE 
VERSTÄNDLICH 
GEMACHT 






















erklärt sich bereits durch die Überset- 
zung ”Hart-Kopie”. Der Computer- 
Fachmann versteht darunter den Aus- 
druck eines Listings oder des Bildschirm- 
inhalts auf Papier. Dem gegenüber 
wäre eine ”Softcopy” die Vervielfälti- 
gung auf Kassette oder Diskette. 


sind Leute, die unerlaubt in-Computer- 
Netzwerke oder geschützte Programme 
einbrechen. Nicht immer sind es echte 
Kriminelle, sondern vielfach Kinder 
oder Jugendliche, die die wahre Lei- 
stungsfähigkeit ihres Homecomputers 
austesten wollen. 
Diese neue Art von Kriminalität ist vor 
allem in den USA und Großbritannien 
modern geworden, da es dort Privat- 
. personen noch wesentlich leichter ist, 
öffentliche Datenbanken anzuzapfen 
als bei uns. Obwohl ”hacken” gerade 
den Computer-Fans als echter Sport 
gilt, darf man nicht übersehen, daß es 
sich dabei ohne jedes Wenn und Aber 
um Straftaten handelt. 



















BETRIEBSSYSTEM 




























ist diejenige Software, die Ihren Com- 
puter überhaupt erst betriebsbereit 
macht. Der Hersteller hat Ihrem Rech- 
ner eine Menge Wissen mitgegeben, 
ohne das er Anweisungen von Ihnen 
erst gar nicht akzeptieren könnte. Das 
"Betriebssystem steuert. das Einladen 
der Programmiersprache, die Speicher- 
verwaltung und Prozessor-Ansteue- 
rung, kurzum: es macht das Gesamtsy- 
stem erst lebensfähig. Man kann sich 
das am Beispiel eines Babys klar- 
machen, das zwar kurz nach der Ge- 
burt noch von nichts eine Ahnung hat, 
dennoch schon perfektschreien, atmen 
und in die Windeln machen kann. 
Auch wenn die Eltern auf die eine oder 
andere dieser Fähigkeiten nicht son- 
derlich erpicht sind, handelt es sich 
hier um komplexe Prozesse, die vom 
menschlichen ”Betriebssystem” auto- 
matisch gestartet werden. 










TIMESHARING 























ist das englische Wort für "Zeitteilung”. 
Es bezeichnet das Benutzen einer 
Großrechenanlage durch viele Anwen- 
der. Jeder Teilnehmer sitzt an einem 
Datensichtgerät und greift auf das Sy- 
stem zurück. Der Computer bedient 
nun jeden Benutzer abwechselnd, ähn- 
lich wie ein Großmeister im Schach, 
der simultan an mehreren Brettern 
spielt. Da aber der Rechner noch sehr 
viel schneller arbeitet als der Schach- 
spieler, glaubt jeder Anwender, die An- 
lage stehe ihm allein zur Verfügung. 



















ZEITZÜNDER 















gehört wie die Salami-Taktik zu den 
kleinen Tricks, die einem Hacker von 
Adel das Leben versüßen können. 

Durch eine kleine Manipulation der je- 
weiligen internen Uhr des angezapften 
Systems wird das Hacker-Programm zu 
einer Zeit gestartet, in der sich sein Mei- 
ster in angemessener Entfernung vom 
Tatort aufhält. Unbedarften Zeitgenos- 
sen gegenüber kann so der Schein eines 
Alibis gewahrt bleiben. 











SYNTAX 









bedeutet Grammatik und hat deshalb 
nicht nur mit Computern etwas zu tun. 
Jede Sprachlehre benutzt diesen Be- 
griff ebenso. In der Computerei spricht 
man von Syntax, wenn man die festge- 
legte Formel einer Befehlseingabe 
meint. Da der Computer nicht inter- 
pretieren, d.h. die Wünsche des Benut- 
zers nicht aus seiner Rede heraus- 
”filtern” kann, ist die Beachtung gram- 
maätischer Regeln für das Funktionie- 
ren eines Programms eine Grund- 
voraussetzung. 





PROPORTIONALSCHRIFT 











































gehört in den Bereich der Textverar- 
beitung. Wenn Sie auf Ihrer normalen 
Schreibmaschine einen Brief schrei- 
ben, so setzt die Maschine Zeichen für 
Zeichen nebeneinander, jeweils durch 
einen bestimmten Zwischenraum ge- 
trennt, der unabhängig vom Platzbe- 
darf des jeweiligen Buchstabens ist. 

Bei der Proportionalschrift hingegen 
wird jedem Zeichen gemäß seinem in- 
dividuellen Platzbedarf Raum zugeord- 
net: dem 0 also mehr als dem I, um ein 
Beispiel zu bringen. 






SALAMI 












ist eine der am verbreitesten faulen 
Praktiken rund um den Computer, die 
darin besteht, daß Bankangestellte die 
"kaufmännische Rundung” konse- 
quent einsetzen und die daraus erzielten 
Gewinne ihrem persönlichen Giro- 
konto gutschreiben. 
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HANDSHAKE 


bedeutet nicht etwa eine spezielle Be- | 


grüßungszeremonie zwischen Hackern, 
sondern den Dialog zwischen zwei 
Computern bzw. einem Computer und 
seiner Peripherie. > 
Computer können Daten nicht nur 
schnell verarbeiten, sondern auch aus- 
geben. Dadurch stoßen selbstleistungs- 
fähige Drucker bisweilen an ihre 
Grenzen. 

Das Handshake-Verfahren funktio- 
niert nun so, daß der Rechner eine 
Portion Daten an den Drucker schickt 
und diesen fragt, ob er mit dem Diktat 
Schritt halten kann. Meldet der 
Drucker "Klar, bin aufnahmebereit!”, 
so folgt ein neuer Datenstrom. Sagt der 
Drucker "Bitte warten; ich komme 
nicht mit!”, so hält der Computer das 
nächste Datenbündel ein Weilchen zu- 
rück, bis der Drucker den Anschluß ge- 
funden hat. 


BUFFER 


bedeutet übersetzt ”Puffer” und meint 
einen Zwischenspeicher, der einen 
reibungslosen Datenfluß zwischen ei- 
nem Rechner und seinen Peripherie- 
Geräten. Vermeidet oft das zeitrau- 
bende Handshake-Verfahren (siehe 
auch dort). 


ALGORITHMUS 


ist ein Begriff, der Ihnen in Computer- 
büchern immer wieder begegnet. Er 
geht auf den persischen Mathematiker 
Al Choresmi aus Chorastan (heutige 
Sowjetrepublik Usbekistan) zurück, 
der um 900 n.Chr. am Hof des Kalifen 
von Bagdad lebte. 

Unter einem Algorithmus verstehen 
wir die Anweisung zu einer immer wie- 
derkehrenden Handlung, die allge- 
mein verständlich, präziseund von den 
Besonderheiten einer speziellen Situa- 
tion unabhängig ist. Beispiele finden 
wir im täglichen Leben genug: Wenn 
Sie auf dem Begleitzettel zu Ihren Hu- 
stentropfen lesen ”Wenn vom Arzt 
nicht anders verordnet, nehmen Er- 
wachsene 3 mal täglich 10 Tropfen”, so 
ist das ein Algorithmus wie auch die 
Gebrauchsanweisung am Zigaretten- 


automaten "Geld einwerfen - ge- 
wünschtes Fach ziehen - bei Versagen 
Knopf drücken!”. 


Algorithmen finden sich praktisch in 
jedem Computerprogramm, da es ja 
um Anweisungen geht, die immer wie- 
der benutzt werden sollen, um ein be- 
stimmtes Problem zu lösen. 
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FIRMWARE 


bezeichnet man die vom Hersteller ei- 
nes Computers mitgelieferte Software, 
die meist in einem ROM-Baustein un- 
tergebracht ist (übersetzt etwa: Fest- 
ware). 


TOOLKIT 


heißt auf Deutsch Werkzeugsatz und 
meint ein Softwarepaket, das dem An- 
wender eines Computers eine Reihe 
nützlicher Anweisungen und Routinen 
bietet, die die Programmierarbeit 
wesentlich vereinfachen, im Standard- 
Sprachumfang des jeweiligen Systems 
jedoch nicht enthalten sind. 


MAUS 


Der Computer wird normalerweise 
über die Tastatur bedient. Für die Da- 
teneingabe sowie die Textverarbeitung 
hatsich diese Eingabe-Einheit auch be- 
stens bewährt. Wenn es allerdings um 
Grafik geht, so ist die Tastensteuerung 
sehr unbequem. 

Deshalb entwickelte die Kopierer- und 
Computer-Firma Rank-Xerox in ihren 
Forschungslabors in Palo Alto (USA) 
ein kleines Zusatzgerät, mit dem sich 
Handbewegungen spielend leicht vom 
Schreibtisch auf den Bildschirm über- 
tragen lassen. 

Diverse Konkurrenzunternehmen grif- 
fen die Idee auf, sodaß es heute eine 
Reihe von Mäusen im Wettbewerb um 
die Gunst der Anwender gibt: Bekannt 
wurden vor allem die ”Lisa” von Apple, 
die ”Microsoft-Maus” und die ”Super- 
maus” von Televideo. 

Im Prinzip handelt es sich um nichts 
anderes als einen kleinen Kasten, der 
die Form eines klassischen Telefon-A- 
Modells der Bundespost (ohne Wähl- 
scheibe) besitzt und auf der Unterseite 
mit einer kleinen Kugel ausgestattet ist, 
die jede Bewegung, die das Kästchen 
z.B. auf der Tischplatte macht, in eine 
Cursorsteuerung umsetzt. Dadurch 
lassen sich geometrische Informatio- 
nen verarbeiten, ohne umständlich in 
den Bildschirm-RAM poken zu 
müssen. 

Der Name entstand nicht nur aus der 
Form des Gerätes, sondern überdies 
aus der Tatsache, daß der durch die 
Maus-Firmware erzeugte Cursor weder 
Balken- noch Punktform besitzt: viel- 
mehr gleicht er einem Pfeil, der dem 
Schattenriß einer Maus sehr ähnelt. 





TAKTFREQUENZ 


Ein Mikroprozessor läuft nicht von 
sich aus mit irgendeiner Geschwindig- 
keit, sondern muß angetrieben bzw. ge- 
taktet werden. Dazu verfügt jeder Com- 
puter über einen sogenannten Takt- 
Generator oder Zeitgeber, der wie eine 
Quarzuhr einen Frequenzteiler und so- 
mit die Möglichkeit zur exakten Zeit- 
messung besitzt. Wie Ihre Quarzuhr 
mißt dieser Baustein die Schwingung 
des Quarzkristalls (32768 mal pro 
Sekunde) und teilt diesen Wert 15 mal 
durch 2. Dadurch kommt er auf den 
Wert pro Sekunde. Von dieser Zahl 
nimmt er je nach Typ ein Vielfaches, 
was dann seine jeweilige Taktfrequenz 
oder Arbeitsgeschwindigkeit bestimmt. 
Die Taktfrequenz wird in Mega-Hertz 
(MHz) angegeben. 


AUFLÖSUNG 


Die Bilder aufunserem Fernsehschirm 
werden aus Punkten aufgebaut, die in 
Zeilen und Spalten angeordnet sind. Je 
mehr Punkte pro Zeile (waagrecht) 
oder Spalte (senkrecht), desto deut- 
licher und schärfer wird die jeweilige 
Abbildung. 

So entsteht bereits ein einfaches 
Schwarzschweiß-Fernsehbild nach 
europäischer CCIR-Norm aus 625 Zei- 
len mit jeweils 833 Punkten. Das gibt 
natürlich eine phantastische Auf- 
lösung. 

Ein Home- oder Personalcomputer 
kann soviele (520.625) Punkte natürlich 
nicht einzeln verwalten, muß also mit 
viel weniger auskommen. Eine gute Auf- 
lösung bringen im Computerbereich 
schon Bilder aus 192 x 256 Punkten (ins- 
gesamt also 49.152) - die obere Grenze 
liegt bei etwa 300 x 400 Punkten. 


DOTSs 


sind nichts anderes als Bildpunkte 
(siehe auch unter ”Auflösung”) 


PIXELS 


sind Bildpunkte (vgl. hierzu auch 
”Dots” und ”Auflösung”) 


CPU 69 





Biete an Software 


Sinclair Software Library - Europas 
führende Software-Verleih für $pectrum/ 
ZX-81. Info gegen frank. Umschlag von 
Simpson Software, PF 7809, 
4800 Bielefeld 1 


m m m VC-20Software U m m 
Absolute Spitzenprogramme, F. Kutheil, 
Herm.-Simon-Str. 4, 7890 WT Tiengen 2 


Gomputer-Cassetten, 10er Pack 
mit allem Zubehör C 10 DM 15,- 
120 Cassetten-Aufkleber auf 
Lochstr. 6 DM, A4 Druckb. 7 DM 
Christomenla GmbH, Postfach 
3584 Zwesten, Tel. 05626/281 
Vorkasse + 3 DM Porto o. NN 





000000 TH 000000 
Editior Assembler 198,- DM 
Editor Ass Handbuch Deutsch 98,- DM 
Assembler Kurs Deutsch 98,- DM 
Forth Compiler Deutsch 120,- DM 
Liste anfordern 1,10 DM, Wickert, 
1000 Berlin 65, Müllerstraße 59A 
0000000000000000 


mm m m T199/4 Et Em m m 
EM Achtung nur für Erwachsene. II 
8 Alter ang. Top Sound + Grafik. Ein 
M Spiel, das Sie begeistert. Preis- 
iM hit incl. Cass. + Porto nur DM 10,- IM 
MM in Umschl. an T. Karbach, Rem- I 
M scheiderstraße 18, 5650 Solingen 1 





% ZX Spectrum % Tausche und verkaufe! 
Lars Oeschey, W0841/31498 kA 


6-64-Sonderprogramme abzugeben oder 
zu tauschen. Gratisliste bei Post- 
lagerkarte 058542B, 7900 Ulm/Do. 


VC-20 Programme zum Superpreis von nur 
DM 2,-. Tausche auch. Liste gratis. M. Aha, 
Brunnenweg 20, 6242 Kronberg 2 


ACHTUNG VC-20/64 1 
Wir haben alles für Ihren Computer! Über 
900 Programme aus allen Bereichen schon 
ab..0,50 ‚90..DM! (Kein Schundl!) 
Komplette Programmpakete schon ab 3,- 
DM und und und..(Spitze) 
Z.B. Programmgeneratoren..Statistik und 
Anwenderprogramme, Arcadespiele, Adven- 


a Fordern Sie heute 
Katalog mit vielen 





an! (Gratisit) Es lohnt sich!! Werbekassette 
beachten!!) Aus unserem Angebot! PRO. 
TEXT 64 die wohl einzigste Textverar- 
beitung in Maschli 
gleich und ui 

CALC die Tabell 


inter 10,- DMI! PRO. 
Ikulation mit Profi- 


kettenhilfen..Asseı 
nische Wörterbuch. Fordern 
Sie heute noch unseren Katalog mit Wer- 
bekassette an. 

ACHTUNG TI-99/4A1l 
Ein umfangreicher Katalog mit vielen Tips, 
Tricks ui 








SUPERPREISEI! (Werbekassette heach- 
tenl!) TESTEN SIE UNSER ANGEBOT und die 
Qualität unserer Software! Für nur 2,- DMin 
Brielmarken (oder Münze) senden wir 
Ihnen unseren neuesten Katalog {mit vielen 
Tips und Trick jafeln..) und unsere 
Werbekassette Il mit erstklassigen 
Programmen, Utilities, Anwenderprogramme, 
Arcade, Adventure und und undl! Schreiben 
Sie heute noch an $ + $OFT, J.Schlüter, 
Schöttelkamp 23a, 4620 Castrop Rauxel 9 
{Es lohnt sich) 


CBM-64 70 Programme auf Diskette 
oder Cassette gegen DM 40,- in 
Scheinen an Postlagerkarte Nr. 078457 A 
8700 Würzburg 11, 

Lieferung innerhalb 10 Tagen 





CBM 64 Verkaufe + tausche Software 


Liste gegen Rückporto bei 
Klaus Habr, Ringstraße 20, 6522 Osthofen, 
Anruf (15 - 17 Uhr), 06242/2166 


T199 TI99 TI99 TI99 TI99 
SUPERSOFTWARE IN TI-BASIC 
z.B. Spiele 

SCHATZSUCHE (adventure) 16.- DM 
BANDIT 16.- DM 
org. BLACK JACK 16,- DM 
SOUROUND and CONNECT 16... DM 
SNAKE & FLIES 12,- DM STARSWARS 12.- DM 
TI-MAN 12.- DM 


SUPERMIX (3 SUPER PROGAR.) 30,- DM 
VIEL WEITERE IM GROSSEN R.+E.-INFO No. 2 
Versand gegen Vorkasse 0. Nachn.(zuzügl. Pcriok.) 
R.+ E.-SOFTWARE Auf dem Kamp 5 
5163 Langerwehe . 02423/4235 (n. 19.00 h.) 


Tausch 


CBM 64 Verkaufe + tausche Software 
Liste gegen Rückporto bei 
Klaus Habr, Ringstraße 20, 6522 Osthofen, 
Anruf (15 - 17 Uhr) @06242/2166 


Tausche ZX Spectrum Software 
07641/42276 ab 17°° Uhr 


Suche Software 


Appie-Il-Software sucht E. Kunz, 
Höchsterstraße 5, 6234 Hattersheim 1 


Verschiedenes 


FO (I oder It) je 12. 0M 





ete an Hardware 
000000 TIHW/M 000000 
Editor Assembler 198,- DM 
Editor Ass Handbuch Deutsch 98,- DM 
Assembler Kurs Deutsch 98,- DM 
Forth Compiler Deutsch 120,- DM 
Liste anfordern 1,10 DM, Wickert 
1000 Berlin 65, Müllerstraße 59A 
0000000000000000 
‚Akustikkoppler, Schnittstelle E 
und Telefonmodem für 6-64. 
Anfrage oder Prospekte bei 
N. Flesch, Lippspringerstraße 14, 
4650 Gelsenkirchen 
@0209/395447 


ZX-81 Tastatur (Farbig.codierte Tasten wie 


beim Spectrum) DM 15,00 plus Porto DM 
1,40. Simpson Software, PF 7809, 
4800 Bielefeld 1 


Y. V6-20 M. DATAS und Progr. Neuw. 1 
Mon. VB 400,- DM ®0611/700665 


VC-84-Floppy-Sensatloni!! 

2,5 mal schneller Prg. laden für 
Floppy 1541. Auf Eprom-Modul nur. 
DM 59,- Bestellungen an: Z. Zaporowski, 
Krambergstraße 30, 5800 Hagen, 
PS. - Auch für Datasette (10mal 
schneller laden und saven) 





Basic-Kurs VC-20 + VC-64 
Kompakt-Kurs | + II Teil mit Kassette 
zu verkaufen. Information: Rolf Freitag, 
Gneisenaustraße 87, 4600 Dörtmund 1, 

®0231/825826 oder gegen 
80 Pfennig Rückporto 


Achtung! Doppellauf Floppy für 
alle Commodore Rechner zu ver- 
kaufen. Prospekt anfordern bei 
N. Flesch, Lippspringerstraße 14, 
4650 Gelsenkirchen 
0209/39 54 47 





Eine RIESEN AUSWAHL an 
EDV-BÜCHERN. 
Kostenlosen Katalog anfordern. 
EDV-BUCHVERSAND / D. Michel, 
Postfach 110505-78, 5630 Remscheid 11 


Reparaturen von Home-Computern 
und Peripherie, Anfertigung von 
Hardware-Erweiterungen, näheres 
bei Wolfgang Filke, Weidendamm 5, 
3167 Burgdorf 2 


Verkaufe ZX-81 + 16K + Lit.! Preis: 
200 DM!! @0228/315903 ab 14°° Uhr 


Suche Hardware 





Suche Ti-Periphi jox möglichst 
mit Disk-Laufwerk und Disk-Steuer- 
karte mit Garantie. Angebote an 
Heiko Ferring, Theodor-Heuss-Straße 21 
in 5014 Kerpen 3 (Sindorf) 





Auftrag für Gelegenheitsanzeigen in CPU 


An CPU 
Fuldaerstraße 6 
3440 Eschwege 


Name und Adresse 











Unterschrift Ich zahle sofort nach Rechnungserhalt. 


Unter der Rubrik "Kleinanzeigen’'- 
veröffentlichen wir Gele- 
genheltsanzeigen für Verkaufsan- 
gebote, Kauf- und Tauschgesuche, 
Kontaktaufnahme bzw. Erfahrungs- 
austausch usw. 


Ich wünsche folgenden Text zu veröffentlichen: 


Preise für "Kleinanzeigen”: 
Private Kleinanzeige je Druckzeile 
5,- DM inkl. MwSt. Chiffregebühr je 
Anzeige 10,- DM. 


Gewerbliche Gelegenheitsanzeige 
je Druckzeile 11,- DM inkl. MwSt. 
(dürfen nicht unter‘ Chiffre er- 
scheinen). 


Zutreffendes ankreuzen 
D Tausch D Versch. 
D Kontakte DJ Chiffre 


suche [) Hardware 
biete an [[] Hardware 
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Endlich ein Computer, 
den Sie lässig in die Tasche stecken. 


Der einzige akzeptable Chronometer für den Computerfreak. 
Als Geschenk, für den Schreibtisch, für jede Gelegenheit. 





Füllen Sie untenstehenden Coupon aus. 


Senden Sie Ihn an: 
ROESKE-VERLAG 
Abteilung: 3 
Postfach 620 
3440 Eschwege 


& 






DS 
Ss 
sg 


gs 


EN 


















An dieser Stelle veröffentlichen wir gern alle 
Adressen und Selbstdarstellungen von Computer- 
Clubs im In- und Ausland: Wenn auch Sie einen 
User-Club für irgendeinen Computer gegründet 


Club-Infos 


haben (oder noch bilden wollen), schreiben Sie uns 
ganz einfach. Sie werden staunen, wieviele Vereine 
durch so eine Aktion schon Mitglieder und neue 
Ideen gewonnen haben! 


Microcomputer-Anwender 
Und Systeme e.V. MAUS 


Der Microcomputer-Anwen- 
der Und Systeme e.V. -kurz 
MAUS - wurde am 13. Juni 
1983 gegründet und hates bis 
zum Juni 1984 auf über 50 
Mitglieder gebracht. Die 
MAUS will Computeranwen- 
dern, Computerbesitzern 
und an den Computern In- 
teressierten die Möglichkeit 
der Kommunikation schaf- 
fen. Dafür wurden von uns 
an der Bundesallee Räume 
angemietet. 

In diesen Räumen treffen 
sich regelmäßig Arbeitsgrup- 
pen, die sich besondere Teil- 
bereiche der Microelektro- 
nik herausgepickt haben. So 


Korrektur 


existieren im Augenblick die 
AG'’s Assembler (6502, 68000, 
Z80), systematisches Pro- 
grammieren, Pascal, Basic 
für Anfänger und Fortgeschrit- 
tene, Spiele und einige 
andere. 

Bei Interesse halten wir ko- 
stenlos oder gegen einen ge- 
ringen Unkostenbeitrag auch 
Kurse über Programmier- 
sprachen o.ä. ab. 

Bei uns werden alle Com- 
puter, ob Apple, Commo- 
dore, Atari, Sinclair, IBM, 
Sirius und wie sie alle heißen 
mögen, bei Interesse behan- 
delt. Peter Brückner 

Schulstr. 1 
2111 Königsmoor 


Folgende Zeilen müssen zum Programm 
”HANGMAN” für den Laser 210/310 


aus CPU 8/84 ergänzt werden: 


5886 DATA"CAMEL" , "SYNTAX", "ROBOTER", "ENT 


E", "MONITOR", "DRIVE", 


588? DATA"CHIP" , "COMPILER" , "MATRIX", "SIM 


ULATOR" , "DEZIMAL", 


5888 DATA"BINAER" , "OKTAL", "BOOLEAN", "PIL 


OT", "KINGKONG" , "MODUL." , 
3889 DATA"STRUCKTO" , "ULO" 


Zum Programm ”SUPERHIRN” für den Spectrum: 


Das Programm wird mit "LOAD” - und nicht wie irr- 
tümlich abgedruckt CLOAD - geladen. 
Außerdem wurden auf der Seite 53 die Listingblöcke 


vertauscht. 





Nach Zeile 2016 auf S. 52 geht es mit Zeile 2018 aufS. 53 
weiter und nicht mit Zeile 8120! 
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Sinclair-Benutzer-Club 


Erika Hölscher 

Ergänzend zu den Anprei- 
sungen von Frau Hölscher 
sollte vielleicht angemerkt 
werden: 
Der”Club” hatvor wenigen 
Monaten einen neuen 
”Vorstand”bekommen: Frau 
Hölscher. Per Fragebogen 
wurde Kritik aus dem Kreis 
der Clubmitglieder erbeten. 
Kritische Anmerkungen 
beurteilte Frau Hölscher 
als zu kritisch. Dann 
stöhnte sie darüber, daß die 
meisten Mitglieder immer 
nur haben wollten, aber 
selbst nichts täten. 
Anläßlich eines klärenden 
Anrufes dann (bestellte 
Software nach Programm- 
liste kam innerhalb von 
zwei Monaten nicht) er- 
laubte sich Frau Hölscher 
einen Ton, der nur als 
Herumbrüllen bezeichnet 
werden kann. 
Anschließend (nachdem 
sie bereits mehrfach mehr 


Zur Gründung eines ZX- 
81-User-Clubs werden noch 
Mitglieder gesucht 

Es bestehen Möglichkeiten 
zum Soft- und Hardware- 
tausch. 

Interessenten wenden sich 
bitte an folgende Adresse: 


Reinhold Welker 
Vacherstr. 13 
8510 Fürth/Bay. 
Tel.: 0911/738147 
1. Bremer 
TI-99 User Group im 
Gemeinschaftszentrum 


Obervieland 

Für alle, die den TI-99/4A 
Computer benutzen, oder 
benutzen wollen, haben wir 
diese Gruppe gegründet. 

Da die Firma Texas-In- 


oder weniger taktvoll dar- 
auf hingewiesen hatte, daß 
man jederzeit wieder aus- 
treten könne) erfolgte 
dann Rückerstattung - an- 
teilig- eines Monatsbeitra- 
ges. Aufnahmegebühr 
wurde einbehalten. Gegen- 
leistung - außer dem recht 
merkwürdigen Ton und 
sichtlich schlechter Orga- 
nisation -.bis dahin keine. 
Aufnahmegebühren wur- 
den trotz Aufforderung 
nicht rückerstattet. 
Kommentar von Frau Höl- 
scher:”Aus meinem 
Club werfe ich raus, wen 
ich will”. 

Verfahren gegen Frau Höl- 
scher auf Rückerstattung 
wegen solcher Praktiken 
und wegen arglistiger Täu- 
schung läuft vordem Amts- 
gericht Zeven. 

Sonst noch Fragen? 


struments uns alleine gelas- 
sen hat, werden wir uns sel- 
ber helfen! 

Wir bieten an: 

1. Softwaretausch/Progamme 
2. Bücher, Zeitschriften, 
Infos 

3. Drucken und Listings 

4. Treffpunkt zum Klönen 
5. Kontakte mit anderen 
Gruppen 

„wollen Sie weitere Infor- 
mationen 

..dann bitte melden bei: 
Gerhard Hollnagel 
Gemeinschaftszentrum Ober- 
vieland 

Alfred-Faust-Str. 4 

2800 Bremen 61 

Tel.: 0421/82730 oder 821144 
(priv.) 

Treffen: Jeden Donnerstag 
19.30 Uhr im GZO 
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Einen Blick m die Charzs 


CHART NO 1 


THIS 
CHART 


SosuouıBwun. 


NEW RELEASES 


Einen Blick in die Charts 

zu riskieren lohnt sich - wir 
alle wissen das - nicht nur 
bei Videos und Platten. 
Auch für uns Computer- 
Fans rentiert sich das: Und 
weil England als Lieferant 
von Spiele-Software in 


TOP 30 ....._. 


COMPILED BY: BULLDOG SOFTWARE DISTRIBUTION 


SABRE WULF 


JACK AND THE BEANSTALK 


BEACHHEAD 
SON OF BLAGGER 
FLIGHTPATH 737 
JET SET WILLY 
MUGSY 
VALHALLA 


TALES OF THE ARABIAN NIGHTS 


SHEEP IN SPACE 
PSYTRON 
CODENAME MAT 
CAVELON 

BONGO 
NIGHTGUNNER 
FLIGHTPATH 737 
AZTEC CHALLENGE 
LES FLICS 
CHEQUERED FLAG 
LOCO 

LORDS OF MIDNIGHT 
FIGHTER PILOT 
HUNCHBACK 

BLUE THUNDER 
INTERNATIONAL SOCCER 
TRASHMAN 

BOZO’S NIGHT OUT 
FORBIDDEN FOREST 
UGH! 

SPACE PILOT 


TRASHMAN 
ANDROID 2 
INFERNO 
GILLIGAN’S GOLD 
TWILIGHT ZONE 


Europa nach 

Nummer | ist, interessier 
uns die "TOP THIRTY” 
natürlich besonders. 
Auffallend sind die Blitz- 
starts von VALHALLA 
und TALESOFTHE ARA- 
BIAN NIGHTS: die prak- 


LAST 
CHART || PROGRAM PUBLISHER 


ULTIMATE 

THOR 

US GOLD 
ALLIGATA 
ANIROG 
SOFTWARE PROJECTS 
MELBOURNE HOUSE 
LEGEND 
INTERCEPTOR 
LLAMASOFT 
BEYOND 
MICROMEGA 
OCEAN 

ANIROG 

DIGITAL INT. 
ANIROG 

US GOLD 

PSS 

PSION 

ALLIGATA 
BEYOND 

DIGITIAL INT. 
OCEAN 

R. WILCOX 
COMMODORE 
NEW GENERATION 
TASKET 

US GOLD 

SOFTEK 

ANIROG 


QUICKSILVA 
OCEAN 

R. SHEPHERD 
OCEAN 

THOR 


tisch aus dem Stand die 
Ränge 8 und 9 eroberten. 

Daß JET SET WILLY und 
BEACHHEAD soweit aus- 
einander liegen, wundert 
uns ein wenig: Zwar ist BE- 
ACHHEAD als Action- 
Programm phänomenal 


COMPUTER 


SPECTRUM 
SPECTRUM 
CBM 64 

CBM 64 

VIC 20 
SPECTRUM 
SPECTRUM 
SPEC/CBM 64 
CBM 64 

CBM 64 
SPECTRUM 
SPECTRUM 
CBM 64 

VIC 20 
SPECTRUM 
CBM 64 

CBM 64 

CBM 64 
SPECTRUM 
CBM 64 
SPECTRUM 
SPECTRUM 
SPEC/CBM 64 
SPECTRUM 
CBM 64 
SPECTRUM 
CBM 64 

CBM 64 
SPEC/CBM 64 
CBM 64 


CBM 64 

CBM 64 
SPECTRUM 
SPEC/CBM 64 
SPECTRUM 


(detailreiche Szenen-Dar- 
stellung, 3D-Effekt, ganz 
realistischer Sound usw.) 
JET SET WILLY würden 
wir aber mit seiner tollen 
Graphik als ungefähr 
gleichwertig einstufen. 





CPU Kassettenservice 


Unser Softwareversand bietet Ih- 
nen zu wirklich einmalig günstigen 
Preisen jeden Monat die neuesten 
Programme (zu den bereits in frü- 
heren Ausgaben veröffentlichten), 
auf Kassette bzw. Diskette an. 
Wenn Sie die hier aufgeführten 
Bedingungen beachten, können 
auch Sie von unserem Angebot 
Gebrauch machen. 


Bestellungen Inland: 


Gegen Einsendung eines 
Schecks oder Vorauszahlungauf 
unser Konto bei der Kreisspar- 
kasse Eschwege, 

Bankleitzahl 522 500 30 
Kto.-Nr. 45 22 934 






aus CPU 2/84 

Commodore 64 K 10,- DM 
Odyssee D 16,- DM 
Baccarat 

Zx-81 K 10,- DM 
Test 

ZX-Spectrum K10,-DM 
Mondlandung 

Apple II D 16,- DM 
Dr. Apple 

Galgenraten 

Dragon 32 K10,- DM 
Alien-City " 

T1-99/4A K10,- DM 
Chopper-Command 

Zick-Zack 

Atarl K10,- DM 
Location 

Vc-20 K10,- DM 
Aladin D 16,- DM 
Panzerschlacht 


aus CPU 6/84 

ZX Spectrum - K10,- DM 
Zauberwürfel 

Kopierprogramm 

VC-20 K 10,- DM 
Expedition zum Mond D 16,- DM 
Frosch 

Commodore 64 K12,- DM 
Dragon D 16,- DM 
Octopus 

Discs of Tron 

T1-99/4A K10,- DM 
Super Miner 

Earth defense 

Zzx-81 K 10,- DM 
Starwar 

Appie D 16,-DM 


Invasion der Erde 


74 CPU 










senden wir Ihnen die gewünsch- 
ten. Programme schnellstmög- 
lich zu. Geben Sie bitte unbe- 
dingt die genaue Bezeichnung 
der Kassette (z.B. CPU 1/84 TI- 
99/4A) und des Computers an. 


Bestellungen Ausland: 

Nur Vorauskasse, Schein 
(Kassette 10,- DM, Diskette 20,- 
DM). Keine Schecks oder Über- 
weisungen! 


Lieferung noch nicht erhalten? 


aus CPU 3/84 

Apple II D 16,- DM 
Bewitched 

Superhirn 

VC-20 K10,- DM 
River Rescue D 16,- DM 
Höhlenforscher 

ZX-81 K10,- DM 
‚Adventure 

Chop-Lifter 

ZX-Spectrum K10,- DM 
Care-Figther 

Flipper 

T1-99 K10,- DM 
Giftkeks 

Murcaldy Castle 

6-84 K10,- DM 
SOS im Weltraum D 16,- DM 
Goldmine 

Atarl K10,- DM 


Old-Surehand 








aus CPU 7/84 

2X Spectrum 48K K10,- DM 
Grafiktool 

Lander 

VC-20 K10,- DM 
Miner D 16,- DM 
Schlecker 

Commodore 64 K10,-DM 
Hit 64 D 16,- DM 
Jagd 

Atarl 800 K10,- DM 
Superhirn 

T1-99/4A K10,- DM 
Astro-Fighter 

Six-Days 

Apple 11 D 16,- DM 
Editor Manual 

2x-81 K10,- DM 
Pac Woman 

Robot 





Bei Überweisung aufunser Kon- 
to kann es bis zu 2 Wochen 
dauern, bis wir Ihre Bestellungin 
Händen haben. 

Oft passiert es, daß auf der Über- 
weisungsdurchschrift weder Na- 
me, noch Ort, noch Art der Be- 
stellung zu erkennen sind. 
Schreiben Sie uns! (Anrufe 
kosten viel Geld und bringen, 
weil dann Schriftvergleiche nicht 
möglich sind, kein Ergebnis)!. 





aus GPU 4/84 


T1-99/4A 
Kernbeißer 
Digger 
Help 


2x-81 
Kometen 
Börsenspiel 


K10,- DM 


6-20 
Supertronic 
Tron 

Race 


K12,- DM 
D 16,- DM 


ZX-Spectrum K10,- DM 
Super Scramble 


Reversor 


6-64 K12,-DM 
Dragster Crash D 16,- DM 
Star Snake 
Artillary 
Apple D 16,- DM 
Super Star Trek 


K10,- DM 


Dragon 
Backgammon 









aus CPU 8/84 















Wenn es bei uns besonders hek- 
tisch zugeht, dann kann esschon 
mal passieren, daß es mit derLie- 
ferung etwas länger dauert. Ver- 
gessen Sie bitte nicht: Der Kas- 
settenservice ist ein zusätzlicher 
Service von uns, der Ihnen, dem 
Leser, Tipparbeiten ersparen 
soll (Sie kennen den Versuch 
einer anderen Zeitschrift, dieses 
per Lichtgriffel zu ermöglichen). 
Wir tun unser möglichstes. Aber 
Pannen sind nie ausgeschlossen. 
Bitte haben Sie in solchen Fäl- 
len Verständnis. 







aus CPU 5/84 


K12,- DM 
D 16,- DM 


Commodore 64 
Asteroid 
Castle 
Rotamint 


Vc-20 
Zauberwald 
Cask Jumper 
Magic Protection 


K12,-DM 
D 16,- DM 


T1-99/4A K12,- DM 
3D Defence 
Space-Chase 
Pilzjagd 
Z4-81 K10,- DM 
Trigger Treck 
Jahreskostenanalyse 
Apple Il D 16,- DM 
Piont Byte 

Schlacht auf dem Waldmond 





Commodore 64 
Adonis 

Planet Mission 
Fips, die Grille 


Vc-20 

Tennis 
Dangerous Planet 
MOP 

Adreßdatei 


K12,-DM 
D 16,- DM 


2x-81 
Jump Monkey 
React 


Apple Il D 16,- DM 
Solitär 


Bildschirmgenerator 


T1-99/4A 

Zauberhöhle 

Die verrückte Karawane 
Ghost Manor 


ZX Spectrum 
3D-Escape 
Superhirn 


K10,- DM 






aus CPU 9/84 


T1-99 

Supercode 

Pac Man 
Kalenderprogramm 


K12,- DM 


ZX Spectrum 
Annihilators 

2 fache Vergrößerung 
Crown 


Commodore 64 
Grafik 
Ballonflug 
Oasis 


K12,- DM 
D 16,- DM 


ZX-81 
Hangman 
Formengenerator 


VC-20 

Share Holding 
Gallery 
Gardener 
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Starthilfe! 


Das sollte Ihr erstes Buch zum COMMODORE 
64 sein: 64 FÜR EINSTEIGER ist eine sehr 
leicht verständliche Einführung in Hand- 
habung, Einsatz, Ausbaumöglichkeiten und 
Programmierung des COMMODORE 64, die 
keinerlei Vorkenntnisse voraussetzt. Sie 
reicht vom Anschluß des Geräts über die 
Erklärung der einzelnen Tasten und Funk- 
tionen sowie die Peripheriegeräte und ihre |ı 
Bedienung. Schritt für Schritt führt das | 
Buch Sie in die Programmiersprache BASIC 
ein, wobei Sie nach und nach eine komplette Adressenver- 
waltung erstellen, die Sie anschließend nutzen können. Zahl- 
reiche Abbildungen und Bildschirmfotos ergänzen den Text. 
Das Buch ist sowohl als Einführung als auch als Orientierung 
vor dem 64er Kauf gut geeignet. 


64 FÜR EINSTEIGER, 1984, ca. 200 Seiten, DM 29,- 


EN 


Grundkurs. 


Das neue BASIC-Trainingsbuch zum C-64 ist 
eine ausführliche, didaktisch gut geschrie- 
bene Einführung in das CBM BASIC V2. Alle 
Befehle werden ausführlich erläutert. Es 
wird eine fundierte Einführung in die Pro- 
grammierung gegeben. Von der Problem- 
analyse bis zum fertigen Algorithmus lernt 
man das Entwerfen eines Programmes und 
den Entwurf von Datenflußplänen. Die Pro- 
grammierung von Schleifen, Sprüngen, . 
bedingten Sprüngen lernt man leicht ) 
durch „learning by doing‘. So enthält das Trainingsbuch viele 
Aufgaben, Übungen und unzählige Beispiele. Den Schluß des 
Buches bildet eine Einführung ins professionelle Program- 
mieren, in der es um mehrdimensionale Felder, Menuesteue- 
rung und Unterprogrammtechnik geht. Endlich ein Buch, das 
Ihnen wirklich hilft, solide und sicher BASIC zu lernen. 


BASIC TRAININGSBUCH ZUM COMMODORE 64, 1984, ca. 250 Selten, DM 39,- 
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Der schnelle Weg zum Programm! 


MASTER 64 ist ein professionelles Pro- 
grammentwicklungssystem für den 

C-64, das es Ihnen ermöglicht, die Pro- 
grammentwicklungszeit auf einen l 
Bruchteil der sonst üblichen Zeit zu 
reduzieren. 


MASTER 64 in Stichworten: 

70 zusätzliche Befehle - Bildschirm- 

maskengenerator - definieren von Bildschirmzonen - 
Abspeicherung von Bildschirminhalten - Arbeiten mit meh- 
reren Bildschirmmasken - ISAM Dateiverwaltung, in der 
Datensätze über einen Zugriffschlüssel angesprochen wer- 
den können - Datensätze bis zu 254 Zeichen - Schlüssellänge 
bis zu 30 Zeichen - Dateigröße nur von Diskettenkapazität 
abhängig - Zugriff über Schlüssel und Auswahlmasken - Bild- 
schirm- und Druckmaskengenerator - BASIC-Erweiterungen - 
Toolkitfunktionen - Mehrfachgenaue Arithmetik (Rechnen 
mit 22 Stellen Genauigkeit). DM 198,- 





Fundgrube. 


64 Tips & Tricks ist eine hochinteressante 
Sammlung von Anregungen zur fortge- 
schrittenen Programmierung des COMMO- 
DORE 64, POKE’s und andere nützliche Routi 
nen, interessanten Programmen. Aus dem || 
Inhalt: 3D-Graphik in BASIC - Farbige Balken: 
graphik - Definition eines eigenen Zeichen- 
satzes - Tastaturbelegung - Simulation der ® | 
Maus mit einem Joystick - BASIC für Fort- v 
geschrittene - C-64 spricht deutsch - CP/M auf dem COMMO- 
DORE 64 - Druckeranschluß über den USER-Port - Datenüber- 
tragung von und zu anderen Rechnern - Synthesizer in Ste- 
reo - Retten einer nicht ordnungsgemäß geschlossenen 
Datei - Erzeugen einer BASIC-Zeile in BASIC - Kassettenpuffer 
als Datenspeicher - Multitasking auf dem COMMODORE 64 - 
POKE's und die Zeropage - GOTO, GOSUB und RESTORE mit 
berechneten Zeilennummern, INSTR und STRING-Funktion - 
Repeat-Funktion für alle Tasten. Alle Maschinenprogramme 
mit BASIC-Ladeprogrammen. 64 Tips & Tricks ist eine echte 
Fundgrube für jeden COMMODORE 64 Anwender. 


64 TIPS & TRICKS, 1984, über 300 Selten, DM 49,- 







































Tempo! 


MASCHINENSPRACHE FÜR FORTGESCHRITTENE ist 
bereits das zweite Buch von Lothar Englisch zum 
Thema Maschinenprogrammierung mit dem 
COMMODORE 64. In diesem Buch finden Sie unter 
anderem folgende Themen behandelt: Problem- 
lösungen in Maschinensprache, Programmie- 
rung von Interruptroutinen, Interruptquellen 
beim COMMODORE 64, Interrupts durch CIA's und 
Videocontroller, Programmierung der Ein-Aus- 
gabe-Bausteine, die CIA's des COMMODORE 64, 
Timer, Echtzeituhr, parallele und serielle Ein/Aus- 
gabe, BASIC-Erweiterungen, Programmierung eigener BASIC-Befehle, 
Möglichkeiten zur Einbindung ins Betriebssystem sowie viele wei- 
tere Tips & Tricks zur Maschinenprogrammierung. 


MASCHINENSPRACHE FÜR FORTGESCHRITTENE, 1984, ca. 200 Seiten, DM 39,- 


\, Schrittmacher. 


Sie lernen Aufbau und Arbeitsweise des 6510- 

Mikroprozessors kennen und anwenden. Dabei 

werden die Analogien zu BASIC Ihnen beim ver- || 

ständnis helfen. Ein weiteres Kapitel beschäftigt || 

sich mit der Eingabe von Maschinenprogram- || 

men. Dort erfahren Sie auch alles über Monitor- ||| 

Programme sowie über Assembler. Zum einfa- 

chen und komfortablen Erstellen Ihrer eigenen 

Maschinensprache enthält das Buch einen kom- 

pletten ASSEMBLER. Weiterhin finden Sie dort 

einen DISASSEMBLER, mit dem Sie sich Ihre Maschinenprogramme 
oder die Routinen des BASIC-Interpreters und des BASIC-Betriebs- 
systems ansehen können. Ein besonderer Clou ist ein in BASIC 
geschriebener Einzelschrittsimulator, mit dem Sie Ihre Programme 
schrittweise ausführen können. Dabei werden Sie nach jedem 
Schritt über Registerinhalte und Flags informiert und können den 
logischen Ablauf Ihres Programmes verfolgen. Als Beispielpro- 
gramm finden Sie ausführlich beschriebene Routinen zur Grafikpro- 
grammierung und für BASIC-Erweiterungen. 


DAS MASCHINENSPRACHEBUCH ZUM COMMODORE 64, ca. 200 Seiten, DM 39,- 






Die neu® DAT 












Erfolgreich. 


64 für Profis zeigt, wie man erfolgreich An- 
wendungsprobleme in BASIC löst und ver- 
rät die Erfolgsgeheimnisse der Program- 
mierprofis. Vom Programmentwurf über 
Menüsteuerung, Maskenaufbau, Parametri- 
sierung, Datenzugriff und Druckausgabe bis 
hin zur guten Dokumentation wird 
anschaulich mit vielen Beispielen dar- 
gestellt wie Profi-Programmierung vor sich 
geht. Besonders stolz sind wir auf die völlig neuartige Daten- 
zugriffsmethode QUISAM, die in diesem Buch zum ersten Mal 
vorgestellt wird. QUISAM erlaubt eine beliebige Datensatz- 
länge, die dynamisch mit der Eingabe der Daten wächst. Eine 
lauffertige Literaturstellenverwaltung veranschaulicht die 
Arbeitsweise von QUISAM. Neben diesem Programm finden 
Sie noch weitere Programme zur Lager- und Adressenverwal- 
tung, Textverarbeitung und einen Reportgenerator. Alle 
diese Programme sind mit Variablenliste versehen und aus- 
führlich beschrieben. Damit sind diese für Ihre Erweiterun- 
gen offen und können von Ihnen an Ihre persönlichen 
Bedürfnisse angepaßt werden. Steigen Sie in die Welt der 
Programmierprofis ein. 


64 FÜR PROFIS, 2. Auflage, 1984, ca. 300 Seiten, DM 49,- 
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= mehr drin, mehr dran 



























Heinzel 
Arbeitsplatzrechner - 
professionelle Personal- 
computer 


Werner Heinzel zieht nicht den üb- 
lichen Trennungsstrich zwischen 
Home- und Personalcomputer: Der 
Heimcomputer ist für ihn lediglich ein 
privat genutzter Personalcomputer. 
Demzufolge kann ein Heimcomputer 
durchaus auch zu den "professionel- 
len” Geräten zählen, wenn er am Ar- 
beitsplatz, d.h. in Schule und Beruf, ein- 
gesetzt wird. Das Buch führt in die un- 
terschiedlichen Hard- und Software- 
Konzepte ein und eignet sich vorzüglich 
zum Selbststudium. Gedacht ist es sowohl 
als Kaufberatung vor wie auch An- 
wenderhilfen ac hder Anschaffungei- 
nes DV-Systems. 

Die Daten: Hanser, 1. Aufl. 1984, 205 S., 
DM 44,- (ISBN 3-446-13907-9) 


Kassing 


Mikrocomputer 
Struktur und Arbeitsweise 


”(...) Man trifft häufig auf die Meinung, 
daß derinnere Aufbau eines gegebenen 
Mikroprozessors nicht bekannt zu sein 
braucht, wenn nur sein Befehlssatz und 
seine Anschlußbelegung bekannt sind. 
Im Gegensatz zu dieser Einstellung soll 
im folgenden an Hand eines aus Di- 
gitalbausteinen aufgebauten Modell- 
prozessors versucht werden, den Mi- 
kroprozessor ’durchsichtig” zu ma- 
chen. Durch den Aufbau eines 
Modellmikrocomputers soll der Blick 
nur auf das wesentliche, die prinzi- 
pielle, die bleibende Struktur von kom- 
merziellen Mikrocomputern gelenkt 
werden, um dem raschen Typenwech- 
sel des Marktes nicht unterworfen zu 
sein. (...) 

Entsprechend werden im ersten Teil 
dieses Buches, gleichsam als Einfüh- 
rung in die Digitalelektronik, die Zu- 
sammenhänge und die Bauelemente 
besprochen, die für das Verständnis des 





Modellmikrocomputers grundlegend 
sind. Anschließend wird der prinzi- 
pielle Aufbau des Mikrocomputers, 
ausgehend von der einfachsten seriel- 
len Logikeinheit bis zum vollständigen 
System, beschrieben. 

In einem weiteren Abschnitt‘ werden 
diese Einheiten dann aus Bausteinen 
der bekannten TTL (Transistor-Tran- 
sistor-Logik)-Schaltkreisfamilie rea- 
lisiert. Auf diese Weise soll dem Leser 
der Einstieg in dieses Gebiet erleichtert 
und vor allem die Scheu vor den kom- 
plexen Mikrocomputersystemen ge- 
nommen werden, indem er erkennt, 
daß der Mikroprozessor lediglich’ eine 
komplexere Anordnung von den ihm 
bekannten Digitalbausteinen ist. In ei- 
nem letzten Abschnitt wird die Wech- 
selwirkung des Modellmikrocom- 
puters mit peripheren Geräten am Bei- 
spiel von Modell-Analog-Digitalwand- 
lern beschrieben. (...)(Aus dem Vorwort 


Koller 
16 Bit-Microcomputer 


Das sehr stoffreiche Buch beschäftigt 
sich hauptsächlich mit einem detail- 
lierten Vergleich der vier verschiede- 
nen 16 Bit'er TI 9900, Intel 8086, Ziloy 
Z-8000 und Motorola 68000. Koller geht 
speziell aufdie Besonderheiten der ein- 
zelnen Architekturen ein, den Regi- 
stersatz, Flags, die Generierung der 
Speicheradressen, Adressierungsarten, 
Hard- und Software-Interrupts, die Be- 
fehlssätze und die jeweilige Program- 
mierung. Selbst weiterführender Spe- 
zialfragen, wie die Multisprozessor- 
Technologie bleiben nicht unberück- 
sichtigt! 

Die Daten: Hofacker 

(Buch-Nr. 16), 1.Aufl. 1981, 374 S., 29,80 
DM (ISBN 3-921682-80-0) 


des Verfassers) 

Rainer Kassing ist Professor am In- 
stitut für Angewandte Physik der Uni- 
versität Münster und wendet sich ins- 
besondere an Studierende wie Leh- 
rende der Fachschulen Technik und 
Fachhochschulen. Sein Buch ist aber. 
auch für all diejenigen aufschlußreich 
und informativ, die den Prozessor "an 
sich’ aus dem FF kennenlernen wollen. 
Boolesche Algebra, Flipflops, diverse 
Zählerarten, Schieberegister, Multi- 
plexer, Ausgänge (open collector und 
tristate), Codierschaltungen, Speicher, 
Aufbau des Prozessors, Anlage des Mo- 
dellprozessors sowie Peripherie bilden 
die zentralen Themen des Bandes, der 
sich auch vorzüglich zum Selbststu- 
dium eignet. Die Daten: Vieweg, 
1.Aufl. 1984, 149 Abb., 181 S., DM 38,-, 
ISBN 3-528-04217-6 





Banahan/Rutter : 
UNIX lernen, verstehen, 
anwenden 


Unix wurde schon vor über 10 Jahren 
von Ken Thompson und Dennis 
Ritchie geschaffen und führte jahre- 
lang ein Aschenputtel-Dasein, bis die 
Hardware-Entwicklung Anschluß an 
die fortschrittliche Konzeption dieses 
universellen Betriebssystems gefunden 
hatte. Besonders jedoch seit Erschei- 
nen der in einigen Punkten noch verbes- 
serten Unix-Fassung 7 im Jahre 1978 ist 
der Siegeszug nicht mehr. aufzu- 
halten. 

Grund dafür ist zunächst einmal die 
Portabilität: Darunter versteht der 
Fachmann die Eigenschaft eines Be- 
triebssystems, auf möglichst vielen ver- 
schiedenartigen Rechnern in praktisch 
gleicher Form laufen zu können. 
Unix ist ein Paradebeispiel für diese 
Flexibilität. Gerade zusammen mit der 
Programmiersprache C, in der Unix 
selbst geschrieben wurde, arbeitet das 
System, dem Fachleute für die kom- 
menden Jahre noch einen echten 
Boom prophezeien, auf Großrechnern 
ebenso wie auf den kleinsten PC's. 
Die Autoren wenden sich nicht an 
routinierte Profis, sondern an den ab- 
soluten Anfänger (selbst die Funktion 
einer Return-Taste wird erläutert) - und 
diese so konsequent, daß Sie sich von 
Grund auf fundierte Kenntnisse in 
Standard-Unix erarbeitet haben, wenn 
Sie das vorliegende Buch als gelesen zu- 
klappen. Stoffreich und dennoch leicht 
faßlich, können wir "UNIX - lernen, 
verstehen, anwenden” jedem Interes- 
sierten empfehlen. 

Die Daten: Hanser, 1. Aufl. 1984, 308 S., 
DM 48,- (ISBN 3-446-13975-3) 


Lisa-Maria Blum 
Der geheimnis- 
volle Computer 


Ein wirklich liebenswertes Buch, 
welches bestimmt bestens dazu geeig- 
net ist, den kleinen Bruder oder die 
kleine Schwester auf märchenhafte, 
nachdenkliche Weise in die für sie be- 
stimmt noch geheimnisvolle Welt der 
Computer einzuweihen. 

Die Geschichte erzähltvom Computer- 
Roboter-Land, in dem sich kein 
Mensch mehr anstrengen muß, denn 
alle Arbeit wird von Computern erle- 





digt. So gibt es z.B. Babywickelmaschi- 
nen, Tee-Einschenk-Roboter, Plastik- 
rotkehlchen, Lesecomputer und auch 
selbsttätige Schultaschenöffner. Wie 
schön? Odersollteman lieber sagen wie 
schrecklich? 

All diese Erfindungen hat man Profes- 
sor 1000 zu verdanken, der natürlich 
nicht müde wird und laufend weiter 
produziert, denn er träumt von einer 


Kernighan/Ritchie 
Programmieren in ”C” 


Unix (das Betriebssystem) und C (die 
anwenderorientierte Programier- 
sprache) bilden eine Einheit. C ergänzt 
die Flexibilität, durch die Unix be- 
rühmt wurde, mit guter Strukturierbar- 
keit, recht einfacher und klarer Syntax, 
Elementen aus Basic und Pascal, be- 
sitzt jedoch die Mächtigkeit professio- 
neller Sprachen. Der vorliegende Band 
bietet einen Grundkurs in C, der über 
den Charakter einer bloßen Einfüh- 
rung hinausgeht und Sie zum ver- 
sierten Programmierer machen kann. 
Empfohlen sei die Parallelbenutzung 

beider Bände ("Unix-lernen, verstehen, 
anwenden” und der vorliegende Titel), 
um eine möglichst abgeschlossene Lern- 
einheit zu erzielen. 

Die Daten: Hanser, 1. Aufl. 1983, 262 S., 
DM 48,- (ISBN 3-446-13878-1) 





computergelenkten Welt. 

Hans jedoch, der Sohn des Professors, 
lacht nur über all die Erfindungen, und 
hat sich fest vorgenommen, später wie- 
der alles menschlicher zu machen. 
Doch da wird ganz plötzlich Jorinde, 
die Freundin von Hans entführt, der 
sich sofort auf die Suche nach ihr 
macht und dabei tatkräftig von einem 
Computer unterstützt wird. 


Nuss: 

Ich habe mir einen Sharp PC 1401 gekauft und 
möchte ihn an das CE-125 Interface anschließen. 
Geht das? 


A. Schwechart 


Geknackt: 

Sharp hat dies nicht vorgesehen. Die Drucker- 
Rekorder-Kombination CE-125 ist ausschließ- 
lich für die Geräte PC 1245 und 1251 gedacht. Für 
den 1401 gibt es das Drucker-Kassetten-Interface 
CE 126P (kein Rekorder eingebaut), an das jedes 
handelsübliche Tonbandgerät angeschlossen 
werden kann. 

Da aber die Pinbelegung an der Schnittstelle des 
PC 1401 mit der der anderen Geräte (1245, 1251) 
übereinstimmt, ist ein Anschluß möglich, wenn 
Sie ein Verbindungskabel mit zwei kompatiblen 
Steckern basteln. Allerdings ist der 1401 - wie Sie 
sicher wissen - ein Stück breiter als die PC 1245/ 
1251 -Computer. Dadurch wird in keinem Fall 
die Handlichkeit erreicht, die an der Kombi- 
nation PC 1245/CE-125 bzw. PC 1251/CE-125 be- 
sticht. Nur wenn Sie ohnehin Besitzer eines CE- 
125 sein sollten, können wir Ihnen diese Notlö- 
sung empfehlen. 


Nuss: 

Wenn ich bei meinem Sharp PC 1500 ein Pro- 
gramm mit NEW gelöscht habe, kann ich es durch 
A=PEEK(B):PRINT CHR$(4) teilweise wieder 
in die Anzeige bringen, obgleich eine Status- 
Abfrage den RAM als frei ausweist, Wenn ich 
MEM bzw. STATUS 0 eintaste, erscheinen 10042 
Bytes frei (ich habe ein 8K-Erweiterungsmodul). 
Heißt das, daß der Löschbefehl NEW den RAM 
nur scheinbar freimacht? 


V. Christoffel 


Geknackt: 

Beim PC 1500 liegt der Reservebereich zwischen 
den Speicheradressen 16385 und 16581. Der Pro- 
grammspeicher schließt sich mit 16582 an. Intern 
wird jedoch bei NEW in Adresse 30822 eine 0 ge- 
poked, wodurch sich der Anfang eines ge- 
speicherten Programmes in den Reservespeicher 
verschieben läßt. Dadurch werden unter Um- 
ständen Programmteile wieder lesbar, ein lauf- 
fähiges Restaurieren ist so aber nicht möglich. 
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Nuss: 

Ich möchte mir in meine Programme einen Varia- 
blenschutz einbauen, der über ein Password einge- 
geben werden soll. Ich habe mir auch ein solches 
Unterprogramm geschrieben (siehe unten). Es hat 
nur einen Nachteil, es kann jederzeit mit BREAK 
unterbrochen werden, und die Variablen bleiben 
trotzdem erhalten. Es wäre jedoch möglich, dieses 
kleine Programm als Maschinenprogramm zu 
schreiben, da dabei die BREAK-Funktion außer 
‚Betrieb ist. Da ich mich allerdings in Maschinen- 
sprache nicht auskenne, möchte ich Sie bitten, mir 
zu helfen. Oder wissen Sie einen anderen Weg? 
Wichtig ist, daß das Password unsichtbar eingege- 
ben werden soll. Es hat in meinem Programm die 
Bezeichnung "Y$”. Es sollen auch nur die 
Variablen gelöscht werden und nicht das ganze 
Listing. 

1 PRINT" Password?” 

2LETWS="" 

3 FORX=ITOLENYS 

4LETXS="" 

5 LETX$=INEKEYS 

6 IFX$=" "THEN GOTO6 

7 LETWS=WS+XS$ 

8 NEXTX 

9 IFY$<> WSTHEN CLEAR 


Das Password wird vor dem Abspeichern eingege- 
ben mit maximal 10 Buchstaben oder Zahlen. 
Nach diesem Unteprogramm soll der Rücksprung 
ins normale Programm erfolgen, mit beispiels- 
weise folgender Zeil: GOTO "Programm- 
anfang”. 


W. Eisheuer 
Geknackt: 


Password: bei ZX-81 

1. Zeile: SAVE "Programm-Name” 

2. Zeile: POKE 16509,200 

3. Zeile: FAST 

4. Zeile: INPUT A$ (A$=Password) 

5. Zeile: IFA$< > ”Password”THEN STOP 
6. Zeile: Programm 
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ACH, 


computer, vorzutragen. 
Wir werden alle uns zur Verfügung ste- 


henden Mittel einsetzen, um Ihre Fragen beant- 


worten bzw. die Nuß knacken zu können. 
Also schreiben Sie uns! 


Nuss: 

Ich bin Besitzer eines TI's und tippe die meisten 
Programme aus Zeitschriften ab. Nun wäre meine 
Frage, ob ich die Programme verkaufen darf, ohne 
aber das Copyright zu ändern. Verstoße ich durch 
den Verkauf’ der Spiele auf Kassette gegen irgend- 
ein Gesetz oder gegen das Urheberrecht? 


K. Darwisch 


Geknackt: 

Selbstverständlich machen Sie sich durch diese 
Praktik strafbar: Sie verkaufen schließlich Pro- 
gramme, die Ihnen nicht gehören! 

Wenn Spielprogramme abgedruckt sind, heißt 
das nur, daß der Leser sie für den Eigenbedarf 
nutzen kann, nicht jedoch. daß sie in sein Ei- 
gentum übergehen. (Vgl. Siebitte hierzu auch un- 
seren Artikel "Kopierer contra Paragraphen” in 
CPU 8/84, S.71) 


Nuss: 

Ich habe bei meinem VC-20 oft Schwierigkeiten 
mit den vielen Steuerzeichen. Gerade bei Drucker- 
Listings sind die Sondersymbole oft nur mit Mühe 
lesbar. Können Sie mir helfen? Gibt es ein viel- 
leicht hochwertiges Farbband, mit dem ich einen 
besseren Ausdruck bekommen kann. 


S. Allerbeck 


Geknackt: 

Wir glauben nicht, daß es ein Farbband gibt, das 
ihren Ansprüchen genügen könnte. Glücklicher- 
weise bietet der Commodore so schöne Mög- 
lichkeiten, die alle nicht im Handbuch stehen 
und doch das Leben ungemein erleichtern kön- 
nen. So ist es durchaus angebracht, ein häufig 
vorkommendes Steuerzeichen wie "Q” ganz ein- 
fach einer Variablen zuzuordnen, was viel Schreib- 
arbeit und Mißverständnisse spart. Wir geben 
Ihnen ein Beispiel: 

Statt: 10 PRINTTQQQQQQRQRQRQCPU WEISS 
IMMER RAT" 

schreiben Sie ganz einfach folgendes: 

10 XY$=CHR$(19) 

20 FOR 1$1 TO 14 

30 XY$=XY$+”Q” 

40 NEXT I 

50 PRINT LEFTS(XY$,19)"CPU WEISS IM- 
MER RAT” 

Das ist zwar ein wenig aufwendiger, gibt aber 
später keine Mißverständnisse. Wenn Sie Ihre 
Programme auf Papier auslisten und später wieder 
eintippen, kann das manchen Trouble sparen. 
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Nuss: 

Mit Bedauern mußteich feststellen, daß Sie fürden 
Computer Spectravideo SV-318/SV-328 leider 
keine Programme anbieten. 

Ich arbeite in dieser Branche und habe den C-64 
durchgearbeitet und mich dann zum SV-328 ge- 
wendet. Allgemein wird dieses Gerät leider viel zu 
schlecht behandelt. Schlechte Tests beim SV-318 
und gute Tests beim C-64 werten den viel minder- 
wertigeren C-64 zu sehr auf und den viel besseren 
SV-328 zu sehr ab! i 

Der SV-328 verfügt über ein beispielhaftes Basic, 
16 Farben (1x durchsichtig), Tonmöglichkeiten 
wie der C-64; und das ganze ist viel einfacher und 
viel komfortabler zu bedienen (z.B. Funktionsta- 
stenbelegung). 

Vorsicht! Dererste Eindruck einer harten Tastatur 
täuscht ( und ist zudem Geschmackssache). Ein 
leichter Anschlag genügt (mit abschaltbarer aku- 
stischer Kontr.)! 

Der SV-328 hat eine (bei Floppy!) Baud-Rate von 
250 (!!) KBit/sec (wie IBM-PC), ein erweitertes 
Microsoft-Basic mit Farbe, Ton und Grafik (ohne 
Pokes möglich) usw...(CP/M-fähig) 
Bitte arbeiten Sie sich doch einmalrrichtig in dieses 
Gerät ein. 
Die einfache Art mit Spritesund Grafik, Farbe und 
Ton zu hantieren, sollte doch einfach jeden Pro- 
grammierer herausfordern. 
(PS: Es reicht ja ein System mit Daten-Rekorder 
zu Beginn und für die ersten Programme) 
Ich kenne auch Sinclair und Atari, VC-20, C-64, 
Epson HX20, OX-10, Osborne, Seiko, IBM-PC 
und Fortune 32:16. 


A. Theiler 


Geknackt: 

Sie haben völlig Recht, wenn Sie sich für Ihr Sy- 
stem einsetzen. Auch wir werden den Spectravi- 
deo SV 318/328 bald im Software-Angebot haben. 
Leider werden uns bislang noch keine Pro- 
gramme in zufriedenstellender Qualität ange- 
boten, sodaß wir die Spectravideo-Besitzer unter 
unseren Leser noch um etwas Geduld bitten 
müssen. 
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INMAC-Microbuffer 


Um einen Buffer (Puffer- 
speicher) richtig schätzen zu 
können, muß man sich zu- 
nächst folgendes klar 
machen: 

Computer sind schnell - in 
der Verarbeitung wie auch 
Ausgabe von Daten. Sie 
sind oft so fix, daß selbst 
leistungsfähige Drucker 
nicht mehr Schritt halten 
können. 

Im Prinzip ist es nicht an- 
ders als in der Schule, wenn 
ein Diktat geschrieben 
wird, und der Lehrer fragt, 
ob alle mitgekommen sind. 
Der Computer hältmitdem 
Drucker Verbindung und 
erkundigt sich laufend da- 
nach, ob alles, was ge- 
schickt wurde, auch auf Pa- 
pier gebracht worden ist. 
Der Fachmann nennt das 
Handshaking, zu deutsch 
Händeschütteln. 
Handshaking ist sicher 
eine Möglichkeit, Daten- 
verlust niedrig zu halten. 
Praktisch ist es nicht, weil 
wir unseren Computer 
während des Ausdruckens 
nicht für neue Arbeiten ein- 
setzen können. Im Er- 





er Verpackung pro Stück (nur Vorauskasse per 
Scheck) mit Bezeichnung des Ordners (für HC oder CPU 

und Angabe der Stückzahl) können Sie schon kurze Zeit 

nach Bestellungseingang, die in Verarbeitung und Farbe sehr 


ansprechenden Ordner, in den Händen halten. 


Überweisungen bitte auf das Konto-Nr.: 45 22 934 
bei der Kreissparkasse Eschwege, 
Bankleitzahl 522 500 30 


werbsleben bedeutet das 
teure Ausfallzeit, für uns 
Privatanwender ist es zu- 
mindest lästig. 

Hier hilft nun der Puffer- 
speicher, der für den Druk- 
ker so etwas wie der Notiz- 
block der Stenotypistin ist. 
Er schreibt den gesamten 
Text in den Buffer und gibt 
dem Computer darüber 
Meldung. Dieser kann sich 
dann neuen Aufgaben wid- 
men, während der Drucker 
in aller Ruhe seine Arbeit 
aufnehmen kann. 





POWER 


MICROBUFFER 


Unser Testgerät hat eine 
Kapazität von 64K, bietet 
sich also für den Heim- 
computer-Besitzer beson- 
ders an, weil der gesamte 
RAM-Inhalt kopiert wer- 
den kann. Mit 32, 128 und 
256 Kilo-Byte ist der IN- 
MAC aber auch erhält- 
lich. 

Das Gerät paßt zu allen 
gängigen Computern und 
Druckern, ist sowohl als 
8083A (parallel) oder 8084A 
(seriell) verfügbar und hat 
auch bei wenig Raumange- 


Zum Freundschaftspreis von 12,50 DM inclusive 
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bot noch Platz. 

Eine Kopier-Einrichtung 
erlaubt die Vervielfältigung 
von Speicher-Inhalten bis 
zu 255-fach. 

Unser INMAC-Microbuffer 
war während des gesamten 
Testlaufes betriebsbereit 
und wartungsfrei. 

Wer viel arbeitet und schon 
einiges in seine Anlage in- 
vestiertt hat, sollte den 
Microbuffer in Erwägung 
ziehen. Mit 1069,-DM ist 
das Gerät allerdings nicht 
ganz billig. 





ENDLICH SIND 
SIEDA- 


die Mappen die Schluß 
machen mit dem Durch- 


einander in Ihrer GPWY. 


Sammlung 










Die 


Marktbeobachter sagen 
Druckern ohne mechani- 
schen Anschlag für 1984 
eine explosive Umsatzent- 
wicklung voraus. Nach ei- 
ner Studie der Yankee 
Gruppe haben Drucker 
ohne mechanischen An- 
schlag, und hier vor allem 
Produkte, die auf dem 
Laserprinzip aufbauen, die 


besten Absatzchancen auf 


dem weltweiten Drucker- 
markt. 

Auf der Basis des heutigen 
Marktwertes wird diese 
Produktgruppe 1987 einen 
Umsatz von $ 1.958 Mrd. 
und damit einen Markt- 
anteil von 60,5% erzielen. 
Im Vergleich dazu wurden 
zum Jahresende 1982 Pro- 
dukte im Wert von $ 622 
Mio. umgesetzt. 

Dieses rasante Wachstum 
ist in erster Linie dem 


starken Zuwachs von Per- 
sonal Computern und dem 
Einzug von Mehrplatzsy- 
stemen in das Büro zu ver- 
danken. Dadurch hat sich 
eine neue und zu- 


kunftsorientierte Markt- 
lücke für preiswerte Laser- 
drucker aufgetan, die so- 
wohl den Anforderungen 
kommerzieller Systeme 
hinsichtlich Druckgeschwin- 
digkeit, Druckqualität, 
Drucksatz und Anpas- 
sungsfähigkeit genügen als 
auch die Erwartung von 
PC-Anwendern in Puncto 
Preis/-Leistungsverhältnis 
erfüllen. 
Entwicklungstendenzen bei 
Laserdruckern 
Laserdrucker wurden üb- 
licherweise nur mit größe- 
ren Computeranlagen ein- 
gesetzt. Die Drucker wur- 


den populär, weil sie auf 


unterschiedlichsten For- 
mularen qualitativ hoch- 
wertige Ausdrucke und 
Grafiken mit hoher Ge- 
schwindigkeit (typisch 12.000 
Zeilen/Minute, oder ca. 200 
Seiten/Minute) erzeugen 
konnten. 

Für diese hohe Leistung 
mußte oft ein hoher Preis 
bezahlt werden. Da diese 
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Laserdrucker 


Drucker aber meist von 50 
oder mehr Anwendern ge- 
meinsam benutzt wurden, 
ergab sich immernoch ein 
vertretbarer Preis pro Be- 
nutzer. 

Neue Entwicklungen und 
eine verbesserte Technik 
konnten jetzt die Preise von 
Laserdruckern auf das Ni- 
veau von Personal Com- 
putern senken. Japanische 
Hersteller von Fotoko- 
pierern, wie Canon, die den 
Laserdruck-Mechanismus 
entwickelten, der sich jetzt 
durchzusetzen beginnt, ha- 
ben bei der Preissenkung 
von Laserdruckern eine 
wichtige Rolle gespielt. 
Canon hat die in der Her- 
stellung von Fotokopierern 
gesammelte Erfahrung ein- 
gebracht, und entwickelte 
so einen Laserdrucker, bei 
dem Toner, Entwickler und 
Trommel in einer auswech- 
selbaren Kassette unterge- 
bracht sind. 

Ein Halbleiter-Laser, ein 
mehreckiges Spiegelrad 
und die entsprechende 
Optik sind die Hauptbe- 
standteile des Laserdruck- 
Mechanismus des LBP-CX 
von Canon, der auf der 
Comdex-Messe im Herbst 
1983 vorgestellt wurde. 

Die Amerikaner konnten 
bei der Entwicklung eines 
neuen Druckers auf eine 
vierjährige Erfahrung in 
der Herstellung von Laser- 
druckern zurückgreifen. 
Wie bei den großen Laser- 
druckern HP 2680A mit ei- 
nem Durchsatz von 700.000 
Seiten pro Monat, oder den 
Büro-Laserdruckern 2687 A 
und 2688A, die für einen 
monatlichen Durchsatz 
von ca. 30.000 Seiten ausge- 
legt sind, wird auch beim 
LaserJet von Hewlett Pack- 
ard der Ausdruck nicht 
zeichenweise, sondern Seite 
für Seite für den Drucker 
aufbereitet. Der Drucker 
hat eine Auflösung von 
300x300 Punkten pro Zoll, 
kann mehrere Zeichensätze 
verwenden, Text mit Grafik 
mischen und verfügt über 
diverse Anschlußmöglich- 
keiten. 

Achtmal so schnell wie die 
meisten Typenraddrucker 
bietet der neue Laserdruk- 


ker dennoch echte Korres- 
pondenzqualitäten. Prak- 
tisch geräuschlos (weniger 
als 55dBA) und extrem zu- 
verlässig zu sein, sind 
weitere Merkmale, die ge- 
rade Benutzer von Ty- 
penraddruckern am mei- 
sten schätzen. 

Die Yankee Gruppe folgert 
in ihrem Bericht, daß 
derartige Vorteile, in Ver- 
bindung mit einem niedri- 
gen Preis, voraussichtlich 
dazu führen, daß Laser- 
drucker in naher Zukunft 
den Matrix- und Ty- 
penraddruckern erheb- 
liche Marktanteile abneh- 
men werden. 

So ist der HP LaserJet- 
Drucker achtmal schneller 
als ein normaler Ty- 
penraddrucker und paßt 
auf jeden Schreibtisch. 
Der neue Drucker ist als 
Ausgabegerät für Personal 
Computer wie den HP 150 
mit _ Kontaktbildschirm, 
den IBM-PC oder IBM- 
kompatibel System geeig- 
net. 

Der HP-LaserJet ist kom- 
patibel mit Software- 
paketen wie Lotus 1-2-3, 
Multimate und WordStar. 
Der Drucker kann im 
Quer- und Längsformat 
drucken und eignet sich da- 
mit für normale Bürokor- 
respondenz und, bei Ver- 
wendung eines kompri- 
mierten Zeichensatzes, für 
den Ausdruck von Arbeits- 
blättern. 

DerDrucker arbeitetmitei- 
ner Geschwindigkeit von 8 
Seiten pro Minute. Die 
Druckqualität ist prak- 
tisch die einer elektrischen 
Schreibmaschine. 
Zusätzlich zum Zeichen- 
satz Courier 10, der zum 
normalen Lieferumfang 
gehört, kann der LaserJet 
bis zu drei Zeichensätze in 
Form von Einschubkasset- 
ten aufnehmen. Pro Seite 
können drei verschiedene 
Schriftarten gemischt wer- 
den. Bereits jetzt sind 
Zeichensätze wie Fett- und 
Kursivschrift in Courier, 
Proportionalschriften in 
Fett- und Kursivdruck und 
ein komprimierter Zeichen- 
satz erhältlich. Weitere 
Zeichensätze befinden sich 
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kommen 


zur Zeitin der Entwicklung 
und werden bis Ende des 
Jahres verfügbar sein. 
Arbeitet der HP LaserJet- 
Drucker mit dem Personal 
Computer HP 150 mit 
Kontakt-Bildschirm; so 
können die Möglichkeiten 
der integrierten Rastergra- 
fik voll genutzt werden. 
Grafiken, die am Bild- 
schirm des HP 150 darge- 
stellt werden, können direkt 
mit dem LaserJet-Drucker 
auf Papier kopiert werden. 
Für den IBM-PC ist die 
Software zum Kopieren des 
Bildschirminhalts in Vor- 
bereitung und wird im 
Laufe des Jahres erhält- 
lich sein. 

Der Ausdruck von Gra- 
fiken unter Programm- 
steuerung kann mit dem 
HP 150 und auch mit dem 
IBM-PC erfolgen. 

HP arbeitet nach eigenen 
Aussagen mit den Soft- 
ware-Herstellern eng zu- 
sammen, um die Grafik- 
fähigkeiten und andere Ei- 
genschaften des LaserJet- 
Druckers in möglichst vie- 
len Anwendungen zu nut- 
zen. 

Im Gegensatz zu anderen 
Druckern im PC- und 
Heimcomputer-Bereich ar- 
beitet der LaserJet miteiner 
Einzelblattzuführung für 
verschiedene Standartfor- 
mate wie A4 und BS5. Der 
Drucker erlaubt die Ver- 
wendung von schweren Pa- 
pierqualitäten mit vor- 
gedrucktem Briefkopf, von 
Umschiägen, Etiketten und 
Folien, die normalerweise 
für Fotokopierer geeignet 
sind. 

Die eingebaute Einzelblatt- 
zuführung faßt 100 Blatt 
Papier. Neben der auto- 
matischen Zuführung kön- 
nen im Einzelbetrieb auch 
Zwischengrößen bedruckt 
werden. Bei Handbetrieb 
ist auch beidseitiges Be- 
drucken möglich. 

Beim LaserJet-Drucker 
entfällt das bei herkömm- 
lichen Druckern übliche 
umständliche Auswech- 
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seln des Farbbandes: Der 
Benutzer klinkt einfach 
eine neue Druckkassette 
ein. Die Kassette reicht für 
etwa 3000 Druckseiten. 
Legt man die Kosten einer 
Kassette um, so bedeutet 
dies umgerechnet 10 Pfen- 
nig pro Druckseite. 

Laut HP reduziert der Aus- 
tausch einer Kassette Zeit 
und Kosten für vorbeu- 


gende Wartung erheblich. 
Dies ist darauf zurückzu- 
führen, daß jedesmal, wenn 
eine neue elektrofotogra- 
fische Kassette eingelegt 
wird, alle wichtigen, das 
Druckbild bestimmenden 
Komponenten, einschließ- 
lich der Trommel mit aus- 
getauscht werden. Das 
macht das Gerät praktisch 
wartungsfrei. 














Pilelaele lust So Comjipen 


0.2000 550 Jugendliche in Oldenburg 
geschult 


Die Initative der Oldenbur- 
gischen Landesbank AG 
(OLB), Computer-Einfüh- 
rungsseminare für Jugend- 
liche zu veranstalten, hatin 
Oldenburg eine hervorra- 
gende Resonanz gefunden. 
Wie OLB-Vorstandsmit- 
glied Dr. Hubert Forch am 
Donnerstag, dem 12. Juli 
1984, vor Journalisten er- 
klärte, haben rund 550 
Junge Menschen zwischen 
14 und 20 Jahren von dem 
Angebot der Bank Ge- 
brauch gemacht. 

Die Seminare, indenen den 
Teilnehmern Grundwissen 
über den Umgang mit 
Mikro-Computern vermit- 
telt wurden, liefen seit 
Mitte Mai im Berufsbil- 
dungszentrum der OLB 
und endeten am 14. Juli. An 
drei Nachmittagen wurden 
die Jugendlichen durch spe- 
ziell ausgebildete Trainer 
geschult. Mit der Ausar- 
beitung des Seminar-Pro- 
grammes und der Trai- 
nerausbildung hatte die 
Bank Prof. Dr. Ing. Peter 
Gorny, Professor für Ange- 
wandete Informatik an der 
Universität Oldenburg, be- 
auftragt. 

Die Seminare wurden von 
der Firma Commodore ko- 
stenlos mit Mikrocom- 
putern ausgestattet, wäh- 
rend die Oldenburger 
Firma Syntax den Service 
ebenfalls kostenlos über- 
nahm. 
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Nach den Aussagen von 
Dr. Forch haben die jungen 
Leute engagiert an den Se- 
minaren teilgenommen. 
Obwohl in relativ kurzer 
Zeit ein komprimiertes 
Wissen aufgenommen wer- 
den mußte, seien 99% ” bei 
der ”Stange geblieben”. 
Diese Haltung wurde zum 
Ende jedes Seminars mit 
Abschlußzertifikaten be- 
lohnt. 

Altersmäßig überwogen die 
jüngeren Jahrgänge beiden 
Teilnehmern. 87% waren 
Schüler, wobei Gymnasia- 
sten mit 44% vertreten wa- 
ren. Dem standen 10% Aus- 
zubildende gegenüber. 2% 
der Teilnehmer waren ar- 
beitslose Jugendliche. 

Dr. Forch bedauerte dies, 
denn Computerwissen er- 
höhe die berufliche Quali- 
fikation und verbessere die 
Zukunftschancen der Ju- 
gendlichen. Er wies darauf 
hin, daß 1990 wahrschein- 
lich 70% aller Berufstätigen 
im weitesten Sinne mit 
Computern arbeiten wer- 
den. 

Ebenso sei zu bedauern, 
daß nur 30% Mädchen teil- 
genommen haben. Dieses 
geringe Interesse beim weib- 
lichen Geschlecht wider- 
spricht nach Meinung von 
Dr. Forsch dem Anspruch 
auf berufliche Gleichbe- 
rechtigung. 

Grundsätzlich sei jedoch 
aus den Äußerungen der 


Teilnehmer erkennbar, daß 
sich viele weiter mit der 
Materie beschäftigen wer- 
den und sich auch beruf- 
lich in den EDV-Bereich 
orientieren wollen. Dies sei 
auch das Ziel der OLB- 
Aktion, meinte Dr. Forch. 
Sie sollte nur Anstoß sein, 
sich ernsthaft weiterzubil- 
den und dafür entsprechen- 
de Angebote, z.B. bei den 
Volkshochschulen zu nut- 
zen. Die allgemeinbilden- 
den Schulen, wo die Com- 
puterausbildung ansich 
beginnen sollte, sei dafür 
noch nicht ausreichend ge- 
rüstet, sagte Dr. Forch. Es 
fehle an Geld und Geräten, 
an einheitlichen Konzep- 
tionen und vor allem an 
ausgebildeten Lehrkräften. 
Hier ist man in den USA, 
Japan und auch im EG- 
Land Großbritannien be- 
reits viel weiter. 

Dr. Forch betonte, daß ge- 
rade im strukturschwachen 
Weser-Ems-Gebiet auch 
der Nachwuchs Computer- 
Wissen haben müsse. Un- 
ternehmen, die sich mit zu- 
kunftsgerichteten Techno- 
logien beschäftigen, be- 
dürften, um sich hier 
stärker zu etablieren, ins- 
besondere qualifiziertes 
Personal. 

Auch vor diesem Hinter- 
grund sei die OLB gerne 
dem Aufruf der Bundesmi- 
nister Wilms und Riesen- 
huber vom Frühjahr gefolgt, 


Initiativen zur Förderung 
des Computer-Wissens bei 
Jugendlichen zu ent 
wickeln. Dank der Unter- 
stützung der Fimen Com- 
modore und Syntax sowie 
der Mitarbeit von Prof. 
Gorny sei das Oldenburger 
Pilotprojekt so erfolgreich 
verlaufen, daß man mit den 
dabei gewonnenen Erfah- 
rungen jetzt eine Fortset- 
zung an weiteren OLB- 
Standorten im Weser-Ems- 
Gebiet plane, erklärte Dr. 
Forch. Ab September sol- 
len zunächst in den Städten 
Aurich, Leer, Norden, Witt- 
mundund Jever Computer- 
Seminare stattfinden. Zu- 
sagen von Schulen, in de- 
nen die Seminare statt- 
finden können, lägen be- 
reits vor. Auch hier wird die 
Firma Commodore wieder 
die Geräteausstattung über- 
nehmen, versicherte Com- 
modore-Geschäftsführer 
Alwin Stumpf, während der 
Service von örtlichen Ver- 
triebsfirmen vorgenom- 
men wird. 

In 1985 ist, It. Dr. Forch, 
evtl. eine Wiederholung der 
Aktion in Oldenburg vor- 
gesehen. Nachfrage, die be- 
reits beim Pilot-Projekt 
nicht vollständig befriedigt 
werden konnte, sei sicher 
mehr als genug vorhan- 
den. 





September 1984 
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Bestellkarte 


Ich möchte GPU und Homecomputer ab der nächsterreichbaren Ausgabe zum 
günstigen Abonnementspreis von 100,- DM für 24 Ausgaben, vierzehntägig ins 
Haus geliefert bekommen. 


I»PPPPPPPPIPPPIPPIIIIDIIIPIIIDIDIDIDIIIDIIDDDV 
Bestellkarte 


Ich möchte CPU ab der nächsterreichbaren Ausgabe zum günstigen 
Abonnementspreis von 55,- DM für 12 Ausgaben, monatlich ins Haus 
geliefert bekommen. 








Name/Vorname Name/Vorname 








Straße PLZ Ort 


Ich wünsche folgende Zahlungsweise (12 Hefte jährlich DM 55,- innerhalb der BRD, 
‚Ausland siehe Impressum) 


Straße PLZ Ort 


Ich wünsche folgende Zahlungsweise (24 Hefte jährlich DM 100,- innerhalb der BRD, 
Ausland s. Impressum) 























OD Bargeldios und bequem durch Bankeinzug: BLZ (vom Scheck abschreiben) OD Bargeldios und beq, Inzug: BLZ (vom Scheck abschreiben) 
Konto-Nr. Geldinstitut Konto-Nr. Geldinstitut 
D Gegen Rechnung D Rechn! 






(keine Vorauszahlung leisten) (keine Vorauszahlung leisten) 


Mir ist bekannt, daß ich diese Bestellung innerhalb 8 Tagen widerrufen kann. Mir ist bekannt, daß ich diese Bestellung innerhalb 8 Tagen widerrufen kann. 








Datum/Unterschrift Datum/Unterschrift 


PPPPPPIPPIPPIPIPIPPIPIPPIPIIIIPIIIIIIIIIA 
2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)2)97 


Diese Karte ausschneiden oder Fotokopieren und einsenden an umseitige Adresse. 


Fa Sa a ee ag ef ae na Wa PAR Da ira en 2 ae A Tr Var: Ya have Paar ai Bra a an Krb Der ER ea A DER Aa SE ee 


Diese Karte ausschneiden oder Fotokopieren und einsenden an umseitige Adresse. 


FEB RER 2 A aa den 2a En BE DE La EEE A a Be a a En a EB Eh ee ln RE SS A 1 7 BE A EA ne San ED ee EEE Ten A nee 


CET EEIETTTEITTETTTETTTTTTTIEIETTTTTLTTETTG 
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Garantie 


Bitte 
. frei 


Garantie 


Bitte 


frei 
machen 


machen 


Wir senden Ihnen 

CPU und Homecomputer regel- 
mäßig ab der 
nächsterreichbaren Ausgabe zu. 


Wir senden Ihnen 
CPU regelmäßig ab der nächster- 


reichbaren Ausgabe zu. EFU 










s H t i = 
DMECDFIDUIEE, JE i (erste 
Die Lieferung erfolgt frei Haus R DI LLSTERUNG GEIDBGT Tal Haue 
inclusive Mehrwertsteuer und ü 
i Zustellgebühren. A 

Zustellgebühren. Verlagsunion je Verlagsunion 

> Friedrich-Bergius-Straße 7 Friedrich-Bergius-Straße 7 
Sie können Ihre Abbonnements Postfach 5707 Sie können Ihr CPU-Abonnement Postfach 5707 
jeweils 8 Wochen vor Ablauf der jeweils 8 Wochen vor Ablauf der 
12-monatigen Mindestbezugs- 2 12-monatigen Mindestbezugs- 
dauer schriftlich kündigen. 6200 Wiesbaden dauer schriftlich kündigen. 6200 Wiesbaden 


I 
| 
I 
I 
I 
j 
(f 
| 
I 
I 
I 
| 
j 
I 
| 
I 
I 
inclusive Mehrwertsteuer und 
| 
| 
I 
I 
I 
I 
I 
I 
| 
j 
I 
| 
x 


RX 


GROSSE FREUNDSCHAFTS- 
WERBEAKTION ın CPU 


Kennen Sie unsere Zeitschrift -CPU- bereits und haben 
Freunde und Bekannte die ebenfalls begeisterte Hobby- 
programmierer sind, dann sollten Sie ihnen 
einmal -CPU- vorstellen. 


Unser Dankeschön für jeden neuen Abonnenten sind 
3 tolle Spielekassetten nach Ihrer Wahl aus 
unserem Kassettenservice-Angebot. 
Schneiden Sie bitte den markierten Abschnitt’ aus 


und schicken ihn vollständig ausgefüllt in einem 
frankierten Umschlag an den 


ROESKE Verlag 















Die 3440 Eschwege Ans 
3 Kassetten schrift 
schicken Sie bitte Fuldaerstraße 6 des gewor- 





an folgende benen Abonnenten: 


Adresse: 








Name, Vorname Name, Vorname 























Straße | 
Alter | 
PLZ/Ort j 
j 
* gewünschte Kassetten Straße | 
L 
für Computer 
PLY/Ort 


Hiermit bestelle ich “CPU” ab der nächsterreichbaren 
Ausgabe für die Mindestdauer von einem Jahr zum Preis von DM 55,- 
(12 Exempl.) statt DM 66,- inclusive Porto und Verpackung. 


“bitte genaue Heftnummern und Computer angeben 
(z.B. CPU 4/84, 5/84, 6/84 für ZX-81) 


Die Kündigung des Abonnements muß jeweils 3 Monate vor Ablauf des 
Bezugszeitraumes erfolgen. Ist dies nicht der Fall, 
verlängert sich das Abonnement um weitere 12 Monate. 
U} 
Die Zahlung des Betrages hat sofort nach Rechnungsstellung 
zu erfolgen. 


Die Versendung der Prämie erfolgt, sobald die Rechnung 
bezahlt wurde. 


o 
Mir ist bekannt, daß ich diese Bestellung innerhalb von 8 Tagen 
bei der Bestelladresse widerrufen kann. 





Datum, Unterschrift 
Bei minderjährigen Unterschrift des Erziehungsberechtigten 











Meteoric Programming for the ORIG 1 
von John van der Reyden 






en) Sie die Fascination der Computer- 

nik! 

Heart an ad mia] von da De Be Papa geten 0 ana oe 
s 1 in Sachen Commodore programmie- 

30 speziell für den ORIG 1 entwickelte Su 

Programme: zB. Luna Lander, Eliminator, Sea Beine er base er rg 

‚Copter und viele mehr, die Ihnen zeigen, weiche + hier en En n gel nn 

Farben, Grafiken und welch herrlichen Sound der ee Boca ach 

ORIC produzieren kann. Bee Eon aan ralgkeles, 

Selbsverständlich fehlen auch praktische Tips a a I Gilber anteren 

nicht, die für alte Hasen ebenso interessant sind, —.. Sasse auszeichnen 

wie für junge Füchse! Kai Coommodors 64 Arender sole diese 

Eine ideale Ergänzung dieses Computers! seings Sammlung missen. 


DM 29,80 DM 29,80- 





VC-20 Innovative Computing 


ford Ramshaw 


Ein Buch, geschrieben von einem der kr 
Programmierer in der Microcomputer-\ ne = 
Spannende, interessante Spiele wie Nuclaer 
Attack, Space Fight, Hopper, Invasion, Squash, - 
, Grand Prix, Adventure, und sogar Schach! 
Komplette Listings all dieser und weiterer Spiele, 
leicht verständlich mit vielen Tips und Tricks 


Sn DM 39,80 SPECTRUM Bi ee ver, "ren Ihnen neue Dinensinen 

INN] Zain, Sn DM 29,8 
———_—_ ST 8 9% 
=, Fe. 









DM 28,80, 
Era een 


me. 
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URAN au 


UNDERSTANDING YOUR 


von Dr. lan Logan 
Das Virgin Computer Die Geheimnisse des ZBO Mic 
- 2 werden in diesem Buch anscı 
hücher-Prog z Eine Einführung in die Maschinen: 
grammierung, ein Maschinen: 
‚gramm als Demonstration und © MACHINE LANGUAGE SIMPLE FOR 
Maschinenroutinen in Basicprogramm I YOUR SINCLAIR & TIMEX T81000 
baut, enthält dieses Buch. Alle erföf = von Melbourne House 
Tabellen und Zeicherklärungen sindg SE Die Beherrschung des 280. ZX-81 und Timex 
DM TE 51000 über Basic bis zur Programmierung in 
5 N Maschinensprache, wird in diesem Buch po- 
pulär dargestellt: Jedes Maschinen- 
sprachekommando wird mit ausführlichen 
Beispielen erläutert. Tabellen und Zeichener- 
klärungen runden das Angebot ab. 


DM 35,00 
















Jedes 
einzelne Buch enthält mehr 
- implette, spielfertige 
'ammlistings für den 
betreffenden Computer. 


I oles Buch nur 
DM 19,80 





COMMODORE 64 EXPOSED 


von Bruce Baylay 
Der ausführliche Führer, der Sie zum Meister Spectrum | ‚Hardware Manual 
Ihres Commodore 64 macht! Fi 
Dieses Buch ist eine Enzyklopädie, die über Der Sintair ZX-Spectrum hat die Computerwelt 
alle Möglichkeiten dieses hervorragenden | a revolutioniert, 
Computers anschaulich berichtet. Ob Sie nun Dieses Buch erklärt das Geheimnis seines 


hr 3 j Erfolges und wie das Gerät arbeitet. Viele 

BB TELUGE onDese nen sind, dieses 5 ; AR ‚Aspekte, die das offizielle Manual nicht oder nur 
TEN kurz tr, werden, Ih, Der ee 

# ii vorgestellt: Wie die Farben Ihres lonitors 

DM 35,00 optimal eingestellt werden können, wie der 

interne Lautsprecher durcheinen anderenersetzt 








Bitte benutzen Sie unsere Bestellkarte auf der Um- Malin n EN ar pen 
zusätzlicher (auch selbstgebauter) Hardware 
schlagseite. Über 250 weitere Spiele finden Sie in 3443 Herleshausen an DM 29.50 


unserem Katalog. Bitte anfordern bei: Tel. 05654/6182 


